branch: externals/auctex
commit 61ed48c3f47d3ac13e87df14c05fba0b6b6d629d
Author: Tassilo Horn <t...@gnu.org>
Commit: Tassilo Horn <t...@gnu.org>
Replace add-to-list with pushnew
* tex.el (TeX-style-path): Replace add-to-list on local with
pushnew.
---
ChangeLog | 3 +++
tex.el | 4 ++--
2 files changed, 5 insertions(+), 2 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index d1cc658..52f31c2 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
2015-03-08 Tassilo Horn <t...@gnu.org>
+ * tex.el (TeX-style-path): Replace add-to-list on local with
+ pushnew.
+
* style/bidibeamer.el: New style.
* Makefile.in (STYLESRC): Activate new bidibeamer style.
diff --git a/tex.el b/tex.el
index 5c81994..609a1e4 100644
--- a/tex.el
+++ b/tex.el
@@ -2440,11 +2440,11 @@ 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 (add-to-list 'path file t)))
+ (mapc (lambda (file) (when file (pushnew file path)))
(append (list TeX-auto-global TeX-style-global)
TeX-auto-private TeX-style-private
(list TeX-auto-local TeX-style-local)))
- path)
+ (nreverse path))
"List of directories to search for AUCTeX style files.
Per default the list is built from the values of the variables
`TeX-auto-global', `TeX-style-global', `TeX-auto-private',
