branch: externals/auctex
commit 6ec80c4a3c004995850dda430f8348290f510fda
Author: Tassilo Horn <t...@gnu.org>
Commit: Tassilo Horn <t...@gnu.org>
Fix error reported in <87o8hzto7r....@fastmail.fm> on auc...@gnu.org
* style/polyglossia.el (LaTeX-polyglossia-active-languages): Don't use
add-to-list on lexical variable.
---
style/polyglossia.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/style/polyglossia.el b/style/polyglossia.el
index 64b1bba..36ec765 100644
--- a/style/polyglossia.el
+++ b/style/polyglossia.el
@@ -141,7 +141,10 @@ The last language is the default one."
(setq default (or (string-equal "defaultlanguage" (nth 1 elt))
(string-equal "mainlanguage" (nth 1 elt))))
;; Append the language to the list if it's the default one.
- (add-to-list 'active-languages (car elt) default))
+ (if default
+ (setq active-languages (append active-languages
+ (list (car elt))))
+ (push active-languages (car elt))))
LaTeX-polyglossia-lang-list)
active-languages))
