(texinfo-mode): define outline-regexp to start

with ^, since that's what texinfo-show-structure
documentation says (plus it works much better in texinfo.txi).

diff --git a/lisp/textmodes/texinfo.el b/lisp/textmodes/texinfo.el
index 25670e8c310eb7e2659632c4e96a50db773f91b6..0db3509eb4d17b2a44d36f4e1bed4a0dc286eb4f 100644 (file)
--- a/lisp/textmodes/texinfo.el
+++ b/lisp/textmodes/texinfo.el
@@ -1,6 +1,6 @@
 ;;; texinfo.el --- major mode for editing Texinfo files
 
-;; Copyright (C) 1985,88,89,90,91,92,93,96,97,2000,01,03
+;; Copyright (C) 1985,88,89,90,91,92,93,96,97,2000,01,03, 04
 ;;           Free Software Foundation, Inc.
 
 ;; Author: Robert J. Chassell
@@ -616,7 +616,7 @@ value of `texinfo-mode-hook'."
        (mapcar (lambda (x) (cons (concat "@" (car x)) (cadr x)))
               texinfo-section-list))
   (set (make-local-variable 'outline-regexp)
-       (concat (regexp-opt (mapcar 'car outline-heading-alist) t)
+       (concat "^" (regexp-opt (mapcar 'car outline-heading-alist) t)
               "\\>"))
 
   (make-local-variable 'tex-start-of-header)