# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 970217190 0
# Node ID 170342999dcc62522ba74d610e1b7e9d378a6d39
# Parent  be8ff758041414884243252ac4af0a28e4372c5e
(latex-outline-regexp): Don't use `list*';
it's a function from CL.
(latex-imenu-create-index): Replace eval-when-compile with progn
because latex-section-alist is not bound while compiling.

diff -r be8ff7580414 -r 170342999dcc lisp/textmodes/tex-mode.el
--- a/lisp/textmodes/tex-mode.el	Fri Sep 29 06:47:05 2000 +0000
+++ b/lisp/textmodes/tex-mode.el	Fri Sep 29 08:46:30 2000 +0000
@@ -297,7 +297,7 @@
       ;; Look for chapters and sections.
       (goto-char (point-min))
       (while (search-forward-regexp
-	      (eval-when-compile
+	      (progn
 		(concat "\\\\" (regexp-opt (mapcar 'car latex-section-alist) t)
 			"\\*?[ \t]*{")) nil t)
 	(let ((start (match-beginning 0))
@@ -1467,8 +1467,9 @@
 
 (defvar latex-outline-regexp
   (concat "\\\\"
-	  (regexp-opt (list* "documentstyle" "documentclass"
-			     "begin{document}" "end{document}" "appendix"
+	  (regexp-opt (nconc (list "documentstyle" "documentclass"
+				   "begin{document}" "end{document}"
+				   "appendix")
 			     (mapcar 'car latex-section-alist)) t)))
 
 (defun latex-outline-level ()