Commit 4e9b8ebe authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(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.
parent 6f5ac60d
......@@ -297,7 +297,7 @@ An alternative value is \" . \", if you use a font with a narrow period."
;; Look for chapters and sections.
(goto-char (point-min))
(while (search-forward-regexp
(concat "\\\\" (regexp-opt (mapcar 'car latex-section-alist) t)
"\\*?[ \t]*{")) nil t)
(let ((start (match-beginning 0))
......@@ -1467,8 +1467,9 @@ Runs the shell command defined by `tex-show-queue-command'."
(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}"
(mapcar 'car latex-section-alist)) t)))
(defun latex-outline-level ()
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment