changeset 21292:5d62016adafd

(normal-top-level-add-subdirs-to-load-path): Reverse order of subdirs to add. Don't duplicate the parent dir.
author Richard M. Stallman <rms@gnu.org>
date Thu, 26 Mar 1998 04:26:27 +0000
parents b039d32d8399
children 21de06ed5f74
files lisp/startup.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/startup.el	Thu Mar 26 04:22:13 1998 +0000
+++ b/lisp/startup.el	Thu Mar 26 04:26:27 1998 +0000
@@ -351,7 +351,7 @@
 	      (setq pending (nconc pending
 				   (list (expand-file-name (car contents)))))))
 	  (setq contents (cdr contents)))))
-    (normal-top-level-add-to-load-path dirs)))
+    (normal-top-level-add-to-load-path (cdr (nreverse dirs)))))
 
 ;; This function is called from the subdirs.el file.
 (defun normal-top-level-add-to-load-path (dirs)