]> code.delx.au - gnu-emacs-elpa/blobdiff - packages/auctex/style/german.el
Update AUCTeX ELPA package to the new 11.87 release.
[gnu-emacs-elpa] / packages / auctex / style / german.el
index 3676176d6b66db14e3fa83462c404e82ec8e545e..d1acbbfe4f0d92bd8ff86593b3fd1883e856ba3e 100644 (file)
             `("german" ,open-quote ,close-quote ,q-after-q))))
    (setq LaTeX-babel-hyphen-language "german")
    ;; Fontification of quotation marks.
-   (when (fboundp 'font-latex-add-quotes)
+   (when (and (eq TeX-install-font-lock 'font-latex-setup)
+             (featurep 'font-latex))
      (font-latex-add-quotes '("\"`" "\"'"))
-     (font-latex-add-quotes '("\">" "\"<" german)))
+     (font-latex-add-quotes '("\">" "\"<" german))
+     ;; Prevent "| from leading to color bleed.
+     (font-latex-add-to-syntax-alist (list (cons ?\" "\\"))))
    (run-hooks 'TeX-language-de-hook)))
 
 ;;; german.el ends here