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

[Ralf Angeli]

CVSROOT:        /cvsroot/auctex
Module name:    auctex
Changes by:     Ralf Angeli <angeli>    07/08/19 20:23:13

Index: babel.el
===================================================================
RCS file: /cvsroot/auctex/auctex/style/babel.el,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -b -r1.6 -r1.7
--- babel.el    25 May 2006 07:50:56 -0000      1.6
+++ babel.el    19 Aug 2007 20:23:13 -0000      1.7
@@ -91,23 +91,18 @@
    ;; Fontification
    (when (and (featurep 'font-latex)
              (eq TeX-install-font-lock 'font-latex-setup))
-     (mapcar (lambda (keyword)
-              (add-to-list 'font-latex-match-function-keywords-local keyword))
-            '("selectlanguage"
-              ;; "foreignlanguage" ; Enable once we support proper
-              ;; "iflanguage"      ; highlighting of multiple arguments.
-              "languagename"
-              "useshorthands"
-              "languageshorthands"
-              "shorthandon"
-              "shorthandoff"))
-     (font-latex-match-function-make)
-     (add-to-list 'font-latex-match-variable-keywords-local "defineshorthand")
-     (add-to-list 'font-latex-match-variable-keywords-local "aliasshorthand")
-     (add-to-list 'font-latex-match-variable-keywords-local 
"languageattribute")
-     (font-latex-match-variable-make)
-     ;; Tell font-lock about the update.
-     (setq font-lock-set-defaults nil)
-     (font-lock-set-defaults))))
+     (font-latex-add-keywords '(("selectlanguage" "{")
+                               ("foreignlanguage" "{{")
+                               ("iflanguage" "{{{")
+                               ("languagename" "")
+                               ("useshorthands" "{")
+                               ("languageshorthands" "{")
+                               ("shorthandon" "{")
+                               ("shorthandoff" "{"))
+                             'function)
+     (font-latex-add-keywords '(("defineshorthand" "{{")
+                               ("aliasshorthand" "{{")
+                               ("languageattribute" "{{"))
+                             'variable))))
 
 ;;; babel.el ends here