[elpa] externals/auctex 6351078 09/26: Use LaTeX-style-list for default classes completion.

[Tassilo Horn]

branch: externals/auctex
commit 635107861b47f98ac66dea19efe7ab9216c71e96
Author: Mosè Giordano <address@hidden>
Commit: Mosè Giordano <address@hidden>

    Use LaTeX-style-list for default classes completion.
    
    * latex.el (TeX-arg-document): When `TeX-arg-input-file-search' is
    nil, use `LaTeX-style-list' to complete document classes.  Fixes
    bug#21814.
---
 ChangeLog |    6 ++++++
 latex.el  |   16 ++++++++--------
 2 files changed, 14 insertions(+), 8 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index ca1d4e3..000c652 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2015-11-02  Mos� Giordano  <address@hidden>
+
+       * latex.el (TeX-arg-document): When `TeX-arg-input-file-search' is
+       nil, use `LaTeX-style-list' to complete document classes.  Fixes
+       bug#21814.
+
 2015-10-28  Tassilo Horn  <address@hidden>
 
        * latex.el (LaTeX-fill-break-at-separators): Default to nil
diff --git a/latex.el b/latex.el
index 72d8f85..be466b8 100644
--- a/latex.el
+++ b/latex.el
@@ -2052,14 +2052,14 @@ OPTIONAL and IGNORE are ignored."
         (crm-separator ",")
         style var options)
     (unless LaTeX-global-class-files
-      (if (if (eq TeX-arg-input-file-search 'ask)
-             (not (y-or-n-p "Find class yourself? "))
-           TeX-arg-input-file-search)
-         (progn
-           (message "Searching for LaTeX classes...")
-           (setq LaTeX-global-class-files
-                 (mapcar 'identity (TeX-search-files-by-type 'texinputs 
'global t t))))
-       LaTeX-style-list))
+      (setq LaTeX-global-class-files
+           (if (if (eq TeX-arg-input-file-search 'ask)
+                   (not (y-or-n-p "Find class yourself? "))
+                 TeX-arg-input-file-search)
+               (progn
+                 (message "Searching for LaTeX classes...")
+                 (mapcar 'identity (TeX-search-files-by-type 'texinputs 
'global t t)))
+             LaTeX-style-list)))
     (setq style (completing-read
                 (concat "Document class: (default " LaTeX-default-style ") ")
                 LaTeX-global-class-files nil nil nil nil LaTeX-default-style))