aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/textmodes/tex-mode.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el
index beb468c0ca1..99f0d9d0e93 100644
--- a/lisp/textmodes/tex-mode.el
+++ b/lisp/textmodes/tex-mode.el
@@ -297,7 +297,7 @@ An alternative value is \" . \", if you use a font with a narrow period."
297 ;; Look for chapters and sections. 297 ;; Look for chapters and sections.
298 (goto-char (point-min)) 298 (goto-char (point-min))
299 (while (search-forward-regexp 299 (while (search-forward-regexp
300 (eval-when-compile 300 (progn
301 (concat "\\\\" (regexp-opt (mapcar 'car latex-section-alist) t) 301 (concat "\\\\" (regexp-opt (mapcar 'car latex-section-alist) t)
302 "\\*?[ \t]*{")) nil t) 302 "\\*?[ \t]*{")) nil t)
303 (let ((start (match-beginning 0)) 303 (let ((start (match-beginning 0))
@@ -1467,8 +1467,9 @@ Runs the shell command defined by `tex-show-queue-command'."
1467 1467
1468(defvar latex-outline-regexp 1468(defvar latex-outline-regexp
1469 (concat "\\\\" 1469 (concat "\\\\"
1470 (regexp-opt (list* "documentstyle" "documentclass" 1470 (regexp-opt (nconc (list "documentstyle" "documentclass"
1471 "begin{document}" "end{document}" "appendix" 1471 "begin{document}" "end{document}"
1472 "appendix")
1472 (mapcar 'car latex-section-alist)) t))) 1473 (mapcar 'car latex-section-alist)) t)))
1473 1474
1474(defun latex-outline-level () 1475(defun latex-outline-level ()