[AUCTeX-devel] [elpa] externals/auctex a2a919d 61/69: Use TeX-quote-after-quote in all language style files

[Tassilo Horn]

branch: externals/auctex
commit a2a919d3490021811344659a3f927e25c94c35b7
Author: Mosè Giordano <address@hidden>
Commit: Mosè Giordano <address@hidden>

    Use TeX-quote-after-quote in all language style files
    
    * style/icelandic.el ("icelandic"):
    * style/polish.el ("polish"):
    * style/polski.el ("polski"): Use value of `TeX-quote-after-quote'
      instead of hard-coding t.
---
 style/icelandic.el |    2 +-
 style/polish.el    |    2 +-
 style/polski.el    |    2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/style/icelandic.el b/style/icelandic.el
index 427a88d..64507e1 100644
--- a/style/icelandic.el
+++ b/style/icelandic.el
@@ -42,7 +42,7 @@
  (lambda ()
    (set-syntax-table LaTeX-icelandic-mode-syntax-table)
    (unless (eq (car TeX-quote-language) 'override)
-     (setq TeX-quote-language '("icelandic" "\"`" "\"'" t)))
+     (setq TeX-quote-language `("icelandic" "\"`" "\"'" 
,TeX-quote-after-quote)))
    (setq LaTeX-babel-hyphen-language "icelandic")
    ;; Fontification of quotation marks.
    (when (fboundp 'font-latex-add-quotes)
diff --git a/style/polish.el b/style/polish.el
index dac3451..31397f0 100644
--- a/style/polish.el
+++ b/style/polish.el
@@ -42,7 +42,7 @@
  (lambda ()
    (set-syntax-table LaTeX-polish-mode-syntax-table)
    (unless (eq (car TeX-quote-language) 'override)
-     (setq TeX-quote-language '("polish" "\"`" "\"'" t)))
+     (setq TeX-quote-language `("polish" "\"`" "\"'" ,TeX-quote-after-quote)))
    ;; Fontification of quotation marks.
    (when (fboundp 'font-latex-add-quotes)
      (font-latex-add-quotes '("\"`" "\"'"))
diff --git a/style/polski.el b/style/polski.el
index ef1985b..5e51082 100644
--- a/style/polski.el
+++ b/style/polski.el
@@ -46,7 +46,7 @@
     "ppauza")
    ;; Quotation marks
    (unless (eq (car TeX-quote-language) 'override)
-     (setq TeX-quote-language '("polski" ",," "''" t)))
+     (setq TeX-quote-language `("polski" ",," "''" ,TeX-quote-after-quote)))
    ;; Fontification of quotation marks.
    (when (fboundp 'font-latex-add-quotes)
      (font-latex-add-quotes '(",," "''")))