CVSROOT: /sources/auctex Module name: auctex Changes by: Tassilo Horn <tsdh> 12/09/13 10:14:19
Index: tex.el =================================================================== RCS file: /sources/auctex/auctex/tex.el,v retrieving revision 5.698 retrieving revision 5.699 diff -u -b -r5.698 -r5.699 --- tex.el 14 Aug 2012 18:23:31 -0000 5.698 +++ tex.el 13 Sep 2012 10:14:19 -0000 5.699 @@ -135,6 +135,7 @@ TeX-run-TeX nil (context-mode) :help "Run ConTeXt until completion") ("BibTeX" "bibtex %s" TeX-run-BibTeX nil t :help "Run BibTeX") + ("Biber" "biber %s" TeX-run-Biber nil t :help "Run Biber") ,(if (or window-system (getenv "DISPLAY")) '("View" "%V" TeX-run-discard-or-function t t :help "Run Viewer") '("View" "dvi2tty -q -w 132 %s" TeX-run-command t t @@ -179,6 +180,8 @@ TeX-run-BibTeX: For BibTeX output. +TeX-run-Biber: For Biber output. + TeX-run-compile: Use `compile' to run the process. TeX-run-shell: Use `shell-command' to run the process. @@ -227,6 +230,7 @@ (function-item TeX-run-TeX) (function-item TeX-run-interactive) (function-item TeX-run-BibTeX) + (function-item TeX-run-Biber) (function-item TeX-run-compile) (function-item TeX-run-shell) (function-item TeX-run-discard) @@ -1781,6 +1785,12 @@ :type 'string) (make-variable-buffer-local 'TeX-command-BibTeX) +(defcustom TeX-command-Biber "Biber" + "*The name of the Biber entry in `TeX-command-list'." + :group 'TeX-command-name + :type 'string) + (make-variable-buffer-local 'TeX-command-Biber) + (defcustom TeX-command-Show "View" "*The default command to show (view or print) a TeX file. Must be the car of an entry in `TeX-command-list'." @@ -3293,7 +3303,7 @@ (TeX-strip-extension tex TeX-all-extensions t) ".el")))) ((TeX-match-extension tex (append TeX-file-extensions - BibTeX-file-extensions)) + BibTeX-Biber-file-extensions)) (save-excursion (set-buffer (let (enable-local-eval) (find-file-noselect tex))) @@ -3313,7 +3323,7 @@ (unless (file-directory-p TeX-auto-global) (make-directory TeX-auto-global)) (let ((TeX-file-extensions '("cls" "sty")) - (BibTeX-file-extensions nil)) + (BibTeX-Biber-file-extensions nil)) (mapc (lambda (macro) (TeX-auto-generate macro TeX-auto-global)) TeX-macro-global)) (byte-recompile-directory TeX-auto-global 0)) @@ -3628,8 +3638,8 @@ (make-variable-buffer-local 'TeX-output-extension) -(defcustom BibTeX-file-extensions '("bib") - "Valid file extensions for BibTeX files." +(defcustom BibTeX-Biber-file-extensions '("bib" "ris" "xml") + "Valid file extensions for BibTeX/Biber files." :group 'TeX-file-extension :type '(repeat (string :format "%v"))) @@ -3804,7 +3814,7 @@ '((texinputs "${TEXINPUTS}" ("tex/") TeX-file-extensions) (docs "${TEXDOCS}" ("doc/") TeX-doc-extensions) (graphics "${TEXINPUTS}" ("tex/") LaTeX-includegraphics-extensions) - (bibinputs "${BIBINPUTS}" ("bibtex/bib/") BibTeX-file-extensions) + (bibinputs "${BIBINPUTS}" ("bibtex/bib/") BibTeX-Biber-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 @@ -5161,7 +5171,7 @@ (if arg (setq TeX-style-hook-list nil BibTeX-global-style-files nil - BibTeX-global-files nil + BibTeX-Biber-global-files nil TeX-global-input-files nil)) (let ((TeX-auto-save t)) (if (buffer-modified-p) _______________________________________________ auctex-diffs mailing list auctex-di...@gnu.org https://lists.gnu.org/mailman/listinfo/auctex-diffs