# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 973525773 0
# Node ID ec6dad239f0c94d5208f786c2345c3b3e535066f
# Parent  cc66e1e4c5d38d38867d7e7625c9fa63523419ce
(texinfo-chapter-level-regexp): Remove.
(texinfo-mode): Hard code texinfo-chapter-level-regexp.

diff -r cc66e1e4c5d3 -r ec6dad239f0c lisp/textmodes/texinfo.el
--- a/lisp/textmodes/texinfo.el	Mon Nov 06 15:48:27 2000 +0000
+++ b/lisp/textmodes/texinfo.el	Mon Nov 06 15:49:33 2000 +0000
@@ -438,13 +438,6 @@
 
 ;;; Texinfo mode
 
-;; Also defined in texnfo-upd.el but copied here to avoid having
-;; to require texnfo-upd.el.
-(defvar texinfo-chapter-level-regexp
-  "chapter\\|unnumbered \\|appendix \\|majorheading\\|chapheading"
-  "Regular expression matching Texinfo chapter-level headings.
-This does not match `@node' and does not match the `@top' command.")
-
 ;;;###autoload
 (define-derived-mode texinfo-mode text-mode "Texinfo"
   "Major mode for editing Texinfo files.
@@ -516,7 +509,7 @@
   (setq page-delimiter
         (concat
          "^@node [ \t]*[Tt]op\\|^@\\("
-         texinfo-chapter-level-regexp
+         "chapter\\|unnumbered \\|appendix \\|majorheading\\|chapheading"
          "\\)"))
   (make-local-variable 'require-final-newline)
   (setq require-final-newline t)