[elpa] 295/299: Fix in LaTeX-largest-level-set for XEmacs compatibility.

[Stefan Monnier]

monnier pushed a commit to branch externals/auctex
in repository elpa.

commit 9917ced65cb5679387f2fa858e8618f2d8a23f18
Author: Mosè Giordano <address@hidden>
Date:   Wed Oct 29 13:13:06 2014 +0100

    Fix in LaTeX-largest-level-set for XEmacs compatibility.
    
    * latex.el (LaTeX-largest-level-set): Set `outline-heading-alist'
    only if it is bound.
---
 ChangeLog |    3 +++
 latex.el  |    4 +++-
 2 files changed, 6 insertions(+), 1 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 32afec3..897a9b8 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2014-10-29  Mos� Giordano  <address@hidden>
 
+       * latex.el (LaTeX-largest-level-set): Set `outline-heading-alist'
+       only if it is bound.
+
        * .gitignore: Ignore preview/preview.el.
 
        * Makefile.in (DISTCLEANFILES): Add preview/preview.el.
diff --git a/latex.el b/latex.el
index 565807b..33e4720 100644
--- a/latex.el
+++ b/latex.el
@@ -287,7 +287,9 @@ Additionally the function will invalidate the section 
submenu in
 order to let the menu filter regenerate it."
   (setq LaTeX-largest-level (LaTeX-section-level section))
   (let ((offset (LaTeX-outline-offset)))
-    (when (> offset 0)
+    (when (and (> offset 0)
+              ;; XEmacs does not know `outline-heading-alist'.
+              (boundp 'outline-heading-alist))
       (let (lst)
        (dolist (tup outline-heading-alist)
          (setq lst (cons (cons (car tup)