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

[Ralf Angeli]

CVSROOT:        /cvsroot/auctex
Module name:    auctex
Changes by:     Ralf Angeli <angeli>    07/08/20 20:09:30

Index: csquotes.el
===================================================================
RCS file: /cvsroot/auctex/auctex/style/csquotes.el,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -b -r1.11 -r1.12
--- csquotes.el 25 Aug 2006 17:23:05 -0000      1.11
+++ csquotes.el 20 Aug 2007 20:09:30 -0000      1.12
@@ -26,7 +26,7 @@
 
 ;;; Commentary:
 
-;; This file adds support for `csquotes.sty', version 3.5.
+;; This file adds support for `csquotes.sty', version 3.7.
 
 
 ;;; Code:
@@ -100,8 +100,13 @@
       '("MakeInnerQuote" "Character")
       '("MakeOuterQuote" "Character")
       '("MakeAutoQuote" "Opening quotation mark" "Closing quotation mark")
+      '("MakeAutoQuote*" "Opening quotation mark" "Closing quotation mark")
       '("MakeForeignQuote" "Babel's language name"
        "Opening quotation mark" "Closing quotation mark")
+      '("MakeForeignQuote*" "Babel's language name"
+       "Opening quotation mark" "Closing quotation mark")
+      '("MakeHyphenQuote" "Babel's language name"
+       "Opening quotation mark" "Closing quotation mark")
       '("MakeHyphenQuote" "Babel's language name"
        "Opening quotation mark" "Closing quotation mark")
       '("MakeBlockQuote" "Opening quotation mark" "Delimiter for citation"
@@ -155,10 +160,13 @@
     '("SetCiteCommand" "Command")
     "mkcitation"
     "mkccitation"
+    "mkpreblockpunct"
     "mkmidblockpunct"
     "mkfinblockpunct"
+    "mkpretextpunct"
     "mkmidtextpunct"
     "mkfintextpunct"
+    "mkpredisppunct"
     "mkmiddisppunct"
     "mkfindisppunct"
     '("ifblockquote" 2)
@@ -170,7 +178,8 @@
     '("ifquotecolon" 2)
     '("ifquoteexclam" 2)
     '("ifquotequestion" 2)
-    '("ifstringblank" 2))
+    '("ifstringblank" 2)
+    '("BlockquoteDisable" 1))
    ;; New environments
    (LaTeX-add-environments
     "quoteblock"
@@ -196,55 +205,41 @@
    ;; Fontification
    (when (and (featurep 'font-latex)
              (eq TeX-install-font-lock 'font-latex-setup))
-     (add-to-list 'font-latex-match-function-keywords-local "DisableQuotes")
-     (add-to-list 'font-latex-match-function-keywords-local "RestoreQuotes")
-     (font-latex-match-function-make)
-     (mapcar (lambda (keyword)
-              (add-to-list 'font-latex-match-textual-keywords-local keyword))
-            '("enquote"
-              "foreignquote"
-              "hyphenquote"
-              "textcquote"
-              "textcquote*"
-              "foreigntextcquote"
-              "foreigntextcquote*"
-              "hyphentextcquote"
-              "hyphentextcquote*"
-              "textquote"
-              "textquote*"
-              "foreigntextquote"
-              "foreigntextquote*"
-              "hyphentextquote"
-              "hyphentextquote*"
-              "blockquote"
-              "foreignblockquote"
-              "hyphenblockquote"
-              "blockcquote"
-              "foreignblockcquote"
-              "hyphenblockcquote"))
-     (font-latex-match-textual-make)
-     (mapcar (lambda (keyword)
-              (add-to-list 'font-latex-match-variable-keywords-local keyword))
-            '("setquotestyle"
-              "setquotestyle"
-              "MakeOuterQuote"
-              "MakeInnerQuote"
-              "MakeAutoQuote"
-              "MakeForeignQuote"
-              "MakeHyphenQuote"
-              "MakeBlockQuote"
-              "MakeForeignBlockQuote"
-              "MakeHyphenBlockQuote"
-              "DeclareQuoteStyle"
-              "DeclareQuoteAlias"
-              "DeclareQuoteOption"
-              "DeclarePlainStyle"
-              "SetBlockThreshold"
-              "SetBlockEnvironment"
-              "SetCiteCommand"))
-     (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 '(("DisableQuotes" "")
+                               ("RestoreQuotes" ""))
+                             'function)
+     (font-latex-add-keywords '(("enquote" "*{")
+                               ("foreignquote" "*{{")
+                               ("hyphenquote" "*{{")
+                               ("textcquote" "*[[{[{")
+                               ("foreigntextcquote" "*{[[{[{")
+                               ("hyphentextcquote" "*{[[{[{")
+                               ("textquote" "*[[{")
+                               ("foreigntextquote" "*{[[{")
+                               ("hyphentextquote" "*{[[{")
+                               ("blockquote" "[[{")
+                               ("foreignblockquote" "{[[{")
+                               ("hyphenblockquote" "{[[{")
+                               ("blockcquote" "[[{[{")
+                               ("foreignblockcquote" "{[[{[{")
+                               ("hyphenblockcquote" "{[[{[{"))
+                             'textual)
+     (font-latex-add-keywords '(("setquotestyle" "[{")
+                               ("MakeOuterQuote" "{")
+                               ("MakeInnerQuote" "{")
+                               ("MakeAutoQuote" "*{{")
+                               ("MakeForeignQuote" "*{{{")
+                               ("MakeHyphenQuote" "*{{{")
+                               ("MakeBlockQuote" "{{{")
+                               ("MakeForeignBlockQuote" "{{{{")
+                               ("MakeHyphenBlockQuote" "{{{{")
+                               ("DeclareQuoteStyle" "[{[[{[{[{[{")
+                               ("DeclareQuoteAlias" "[{{")
+                               ("DeclareQuoteOption" "{")
+                               ("DeclarePlainStyle" "{{{{")
+                               ("SetBlockThreshold" "{")
+                               ("SetBlockEnvironment" "{")
+                               ("SetCiteCommand" "{"))
+                             'variable)))))
 
 ;;; csquotes.el ends here