# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 976293304 0
# Node ID 93a6ef17b7f34d2bd58361ac6b7ca08cb6080939
# Parent  58a3bd1f4b35564aa05c745554734ca91ac02664
(texinfo-chapter-level-regexp)
(texinfo-filter): Removed (moved to texinfo.el).

diff -r 58a3bd1f4b35 -r 93a6ef17b7f3 lisp/textmodes/texnfo-upd.el
--- a/lisp/textmodes/texnfo-upd.el	Fri Dec 08 16:31:50 2000 +0000
+++ b/lisp/textmodes/texnfo-upd.el	Fri Dec 08 16:35:04 2000 +0000
@@ -1122,15 +1122,6 @@
   "^@\\(chapter \\|sect\\|subs\\|subh\\|unnum\\|major\\|chapheading \\|heading \\|appendix\\)"
   "Regexp matching chapter, section, other headings (but not the top node).")
 
-(defun texinfo-filter (section list)
-  (let (res)
-    (dolist (x list) (if (eq section (cadr x)) (push (car x) res)))
-    res))
-
-(defvar texinfo-chapter-level-regexp
-  (regexp-opt (texinfo-filter 2 texinfo-section-list))
-  "Regular expression matching just the Texinfo chapter level headings.")
-
 (defvar texinfo-section-level-regexp
   (regexp-opt (texinfo-filter 3 texinfo-section-list))
   "Regular expression matching just the Texinfo section level headings.")