[elpa] externals/auctex 61ed48c 19/35: Replace add-to-list with pushnew

[Tassilo Horn]

branch: externals/auctex
commit 61ed48c3f47d3ac13e87df14c05fba0b6b6d629d
Author: Tassilo Horn <address@hidden>
Commit: Tassilo Horn <address@hidden>

    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  <address@hidden>
 
+       * 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',