comparison lisp/dump-paths.el @ 272:c5d627a313b1 r21-0b34

Import from CVS: tag r21-0b34
author cvs
date Mon, 13 Aug 2007 10:28:48 +0200
parents 966663fcf606
children ca9a9ec9c1c1
comparison
equal deleted inserted replaced
271:c7b7086b0a39 272:c5d627a313b1
33 invocation-name))) 33 invocation-name)))
34 34
35 (setq package-path (packages-find-package-path roots)) 35 (setq package-path (packages-find-package-path roots))
36 36
37 (let ((stuff (packages-find-packages package-path inhibit-package-init))) 37 (let ((stuff (packages-find-packages package-path inhibit-package-init)))
38 (setq late-packages (cdr stuff))) 38 (setq late-packages (car (cdr stuff))))
39 39
40 (setq late-package-load-path (packages-find-package-load-path late-packages)) 40 (setq late-package-load-path (packages-find-package-load-path late-packages))
41 41
42 (setq load-path (paths-construct-load-path roots 42 (setq load-path (paths-construct-load-path roots
43 '() 43 '()
44 late-package-load-path 44 late-package-load-path
45 '()
45 inhibit-site-lisp))) 46 inhibit-site-lisp)))
46 47
47 ;;; dump-paths.el ends here 48 ;;; dump-paths.el ends here