X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/a73cbc5c6f456d875d18e232998a2d0767747dc0..fe623377defcfb3a80ce30b2b4c8f62d9999818f:/packages/auctex/style/swedish.el

diff --git a/packages/auctex/style/swedish.el b/packages/auctex/style/swedish.el
index 010163283..75f633792 100644
--- a/packages/auctex/style/swedish.el
+++ b/packages/auctex/style/swedish.el
@@ -7,7 +7,8 @@
 (TeX-add-style-hook
  "swedish"
  (lambda ()
-   (setq TeX-quote-language
-	 `("swedish" "''" ,TeX-close-quote ,TeX-quote-after-quote))
+   (unless (eq (car TeX-quote-language) 'override)
+     (setq TeX-quote-language
+	   `("swedish" "''" ,TeX-close-quote ,TeX-quote-after-quote)))
    (setq LaTeX-babel-hyphen-language "swedish")
    (run-hooks 'TeX-language-sv-hook)))