(tibetan-pre-write-conversion): Cancel previous

[bpt/emacs.git] / lisp / allout.el

diff --git a/lisp/allout.el b/lisp/allout.el
index 515219a..dd39534 100644 (file)
--- a/lisp/allout.el
+++ b/lisp/allout.el
@@ -6,7 +6,7 @@
 ;; Maintainer: Ken Manheimer <klm@python.org>
 ;; Created: Dec 1991 - first release to usenet
 ;; Version: Id: allout.el,v 4.3 1994/05/12 17:43:08 klm Exp ||
-;; Keywords: outline mode
+;; Keywords: outlines
 
 ;; This file is part of GNU Emacs.
 
@@ -1648,7 +1648,7 @@ otherwise skip white space between bullet and ensuing text."
          t
        (while (looking-at "[0-9]") (forward-char 1))
        (if (and (not (eolp)) (looking-at "\\s-")) (forward-char 1)))
-      (store-match-data match-data))
+      (set-match-data match-data))
     ;; Reestablish where we are:
     (outline-current-depth)))
 ;;;_   > outline-current-bullet-pos ()