[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[AUCTeX-diffs] Changes to auctex/style/babel.el
From: |
Ralf Angeli |
Subject: |
[AUCTeX-diffs] Changes to auctex/style/babel.el |
Date: |
Tue, 31 May 2005 18:33:41 -0400 |
Index: auctex/style/babel.el
diff -u auctex/style/babel.el:1.1 auctex/style/babel.el:1.2
--- auctex/style/babel.el:1.1 Mon May 30 17:24:22 2005
+++ auctex/style/babel.el Tue May 31 22:33:40 2005
@@ -86,16 +86,17 @@
;; Fontification
(when (and (featurep 'font-latex)
(eq TeX-install-font-lock 'font-latex-setup))
- (add-to-list 'font-latex-match-function-keywords-local "languagename")
- (add-to-list 'font-latex-match-function-keywords-local "iflanguage")
- (add-to-list 'font-latex-match-function-keywords-local "useshorthands")
- (add-to-list 'font-latex-match-function-keywords-local
"languageshorthands")
- (add-to-list 'font-latex-match-function-keywords-local "shorthandon")
- (add-to-list 'font-latex-match-function-keywords-local "shorthandoff")
+ (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-textual-keywords-local "selectlanguage")
- (add-to-list 'font-latex-match-textual-keywords-local "foreignlanguage")
- (font-latex-match-textual-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")