From: Karl Berry Date: Mon, 19 Jan 2004 15:18:01 +0000 (+0000) Subject: (texinfo-mode): define outline-regexp to start X-Git-Tag: ttn-vms-21-2-B4~7899 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4e9957bd03902596ba01288e815101f92dbc4920;p=emacs.git (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 25670e8c310..0db3509eb4d 100644 --- 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)