CVSROOT: /cvsroot/auctex Module name: auctex Changes by: Ralf Angeli <angeli> 07/08/22 19:15:40
Index: jurabib.el =================================================================== RCS file: /cvsroot/auctex/auctex/style/jurabib.el,v retrieving revision 1.4 retrieving revision 1.5 diff -u -b -r1.4 -r1.5 --- jurabib.el 25 May 2006 07:50:56 -0000 1.4 +++ jurabib.el 22 Aug 2007 19:15:40 -0000 1.5 @@ -1,6 +1,6 @@ ;;; jurabib.el --- AUCTeX style for the `jurabib' package -;; Copyright (C) 2004 Free Software Foundation, Inc. +;; Copyright (C) 2004, 2007 Free Software Foundation, Inc. ;; Author: Ralf Angeli <[EMAIL PROTECTED]> ;; Maintainer: [email protected] @@ -110,25 +110,38 @@ ;; Fontification (when (and (featurep 'font-latex) (eq TeX-install-font-lock 'font-latex-setup)) - (mapcar (lambda (item) - (add-to-list 'font-latex-match-reference-keywords-local - (car item))) - citecmds) - ;; FIXME: Second argument does not get fontified. - (add-to-list 'font-latex-match-reference-keywords-local "citefield") - (add-to-list 'font-latex-match-reference-keywords-local "footcitefield") - (font-latex-match-reference-make) - (mapcar (lambda (keyword) - (add-to-list 'font-latex-match-function-keywords-local - keyword)) - '("citeswithoutentry" "nextcitefull" "nextcitenotitle" - "nextcitereset" "nextciteshort")) - (font-latex-match-function-make) - (mapcar (lambda (keyword) - (add-to-list 'font-latex-match-variable-keywords-local - keyword)) - '("citenotitlefortype" "citetitlefortype" "jurabibsetup")) - (font-latex-match-variable-make)) + (font-latex-add-keywords '(("cite" "*[[{") + ("citetitle" "[[{") + ("fullcite" "[[{") + ("citet" "[{") + ("citealt" "[{") + ("citep" "[[{") + ("citealp" "[[{") + ("citeauthor" "[[{") + ("citeyear" "[[{") + ("footcite" "[[{") + ("footcite*" "[[{") + ("footcitetitle" "[[{") + ("footfullcite" "[[{") + ("footcitet" "[{") + ("footcitealt" "[{") + ("footcitep" "[[{") + ("footcitealp" "[[{") + ("footciteauthor" "[[{") + ("footciteyear" "[[{") + ("citefield" "[{{") + ("footcitefield" "[{{")) + 'reference) + (font-latex-add-keywords '(("citeswithoutentry" "{") + ("nextcitefull" "{") + ("nextcitenotitle" "{") + ("nextcitereset" "{") + ("nextciteshort" "{")) + 'function) + (font-latex-add-keywords '(("citenotitlefortype" "{") + ("citetitlefortype" "{") + ("jurabibsetup" "{")) + 'variable)) ;; Tell RefTeX (Thanks, Carsten) (when (and (fboundp 'reftex-set-cite-format) _______________________________________________ auctex-diffs mailing list [EMAIL PROTECTED] http://lists.gnu.org/mailman/listinfo/auctex-diffs
