diff lisp/dump-paths.el @ 274:ca9a9ec9c1c1 r21-0b35

Import from CVS: tag r21-0b35
author cvs
date Mon, 13 Aug 2007 10:29:42 +0200
parents c5d627a313b1
children 6330739388db
line wrap: on
line diff
--- a/lisp/dump-paths.el	Mon Aug 13 10:28:54 2007 +0200
+++ b/lisp/dump-paths.el	Mon Aug 13 10:29:42 2007 +0200
@@ -32,9 +32,7 @@
 (let ((roots (paths-find-emacs-roots invocation-directory
 				     invocation-name)))
 
-  (setq package-path (packages-find-package-path roots))
-
-  (let ((stuff (packages-find-packages package-path inhibit-package-init)))
+  (let ((stuff (packages-find-packages roots inhibit-package-init)))
     (setq late-packages (car (cdr stuff))))
 
   (setq late-package-load-path (packages-find-package-load-path late-packages))