[AUCTeX-diffs] Changes to auctex/tex.el,v

[Ralf Angeli]

CVSROOT:        /cvsroot/auctex
Module name:    auctex
Changes by:     Ralf Angeli <angeli>    12/11/26 19:56:22

Index: tex.el
===================================================================
RCS file: /cvsroot/auctex/auctex/tex.el,v
retrieving revision 5.700
retrieving revision 5.701
diff -u -b -r5.700 -r5.701
--- tex.el      5 Nov 2012 16:44:19 -0000       5.700
+++ tex.el      26 Nov 2012 19:56:22 -0000      5.701
@@ -1829,7 +1829,8 @@
   '("\\.aux" "\\.bbl" "\\.blg" "\\.brf" "\\.fot"
     "\\.glo" "\\.gls" "\\.idx" "\\.ilg" "\\.ind"
     "\\.lof" "\\.log" "\\.lot" "\\.nav" "\\.out"
-    "\\.snm" "\\.toc" "\\.url" "\\.synctex\\.gz")
+    "\\.snm" "\\.toc" "\\.url" "\\.synctex\\.gz"
+    "\\.bcf" "\\.run\\.xml")
   "List of regexps matching suffixes of files to be cleaned.
 Used as a default in TeX, LaTeX and docTeX mode.")
 
@@ -3302,8 +3303,10 @@
               (concat (file-name-as-directory auto)
                       (TeX-strip-extension tex TeX-all-extensions t)
                       ".el"))))
-       ((TeX-match-extension tex (append TeX-file-extensions
-                                         BibTeX-Biber-file-extensions))
+       ((TeX-match-extension tex (TeX-delete-duplicate-strings
+                                  (append TeX-file-extensions
+                                          BibTeX-file-extensions
+                                          TeX-Biber-file-extensions)))
         (save-excursion
           (set-buffer (let (enable-local-eval)
                         (find-file-noselect tex)))
@@ -3323,7 +3326,8 @@
   (unless (file-directory-p TeX-auto-global)
     (make-directory TeX-auto-global))
   (let ((TeX-file-extensions '("cls" "sty"))
-       (BibTeX-Biber-file-extensions nil))
+       (BibTeX-file-extensions nil)
+       (TeX-Biber-file-extensions nil))
     (mapc (lambda (macro) (TeX-auto-generate macro TeX-auto-global))
          TeX-macro-global))
   (byte-recompile-directory TeX-auto-global 0))
@@ -3638,8 +3642,13 @@
 
   (make-variable-buffer-local 'TeX-output-extension)
 
-(defcustom BibTeX-Biber-file-extensions '("bib" "ris" "xml")
-  "Valid file extensions for BibTeX/Biber files."
+(defcustom TeX-Biber-file-extensions '("bib" "ris" "xml")
+  "Valid file extensions for Biber files."
+  :group 'TeX-file-extension
+  :type '(repeat (string :format "%v")))
+
+(defcustom BibTeX-file-extensions '("bib")
+  "Valid file extensions for BibTeX files."
   :group 'TeX-file-extension
   :type '(repeat (string :format "%v")))
 
@@ -3814,7 +3823,7 @@
   '((texinputs "${TEXINPUTS}" ("tex/") TeX-file-extensions)
     (docs "${TEXDOCS}" ("doc/") TeX-doc-extensions)
     (graphics "${TEXINPUTS}" ("tex/") LaTeX-includegraphics-extensions)
-    (bibinputs "${BIBINPUTS}" ("bibtex/bib/") BibTeX-Biber-file-extensions)
+    (bibinputs "${BIBINPUTS}" ("bibtex/bib/") BibTeX-file-extensions)
     (bstinputs "${BSTINPUTS}" ("bibtex/bst/") BibTeX-style-extensions))
   "Alist of filetypes with locations and file extensions.
 Each element of the alist consists of a symbol expressing the
@@ -5171,7 +5180,8 @@
   (if arg
       (setq TeX-style-hook-list nil
            BibTeX-global-style-files nil
-           BibTeX-Biber-global-files nil
+           BibTeX-global-files nil
+           TeX-Biber-global-files nil
            TeX-global-input-files nil))
   (let ((TeX-auto-save t))
     (if (buffer-modified-p)