1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/startup.el b/lisp/startup.el
index 920fe717377..1f5c63d6993 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -351,7 +351,7 @@ from being initialized."
               (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)