1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-23 18:47:57 +00:00

(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).
This commit is contained in:
Karl Berry 2004-01-19 15:18:01 +00:00
parent ba0290651f
commit 4e9957bd03

View File

@ -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)