branch: externals/auctex
commit 59f94402ecdcb8a02a3a0d9ab62bb2de01057f3f
Author: Tassilo Horn <[email protected]>
Commit: Tassilo Horn <[email protected]>
Fix void-function error occuring if cl is not loaded
* tex.el (TeX-style-path): Replace `pushnew' with equivalent code
since defcustom init-forms don't seem to get compiled.
---
ChangeLog | 3 +++
tex.el | 4 +++-
2 files changed, 6 insertions(+), 1 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 704ad0c..a53574a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
2015-03-10 Tassilo Horn <[email protected]>
+ * tex.el (TeX-style-path): Replace `pushnew' with equivalent code
+ since defcustom init-forms don't seem to get compiled.
+
* doc/auctex.texi (Modes and Hooks): Document
TeX-after-TeX-LaTeX-command-finished-hook.
diff --git a/tex.el b/tex.el
index 609a1e4..88e2336 100644
--- a/tex.el
+++ b/tex.el
@@ -2440,7 +2440,9 @@ These correspond to the personal TeX macros."
(let ((path))
;; Put directories in an order where the more local files can
;; override the more global ones.
- (mapc (lambda (file) (when file (pushnew file path)))
+ (mapc (lambda (file)
+ (when (and file (not (member file path)))
+ (setq path (cons file path))))
(append (list TeX-auto-global TeX-style-global)
TeX-auto-private TeX-style-private
(list TeX-auto-local TeX-style-local)))
