(texinfo-chapter-level-regexp): Remove.

(texinfo-mode): Hard code texinfo-chapter-level-regexp.

diff --git a/lisp/textmodes/texinfo.el b/lisp/textmodes/texinfo.el
index 596ad94814f0e448c457b82f8366cbd567678191..1a8eec0cbd38eb8acdb186b9ab4b56907352ca92 100644 (file)
--- a/lisp/textmodes/texinfo.el
+++ b/lisp/textmodes/texinfo.el
@@ -438,13 +438,6 @@ chapter."
 \f
 ;;; 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 @@ value of `texinfo-mode-hook'."
   (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)