Mercurial > hg > xemacs-beta

comparison lisp/dump-paths.el @ 388:aabb7f5b1c81 r21-2-9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-9
author cvs
date Mon, 13 Aug 2007 11:09:42 +0200
parents 6330739388db
children 74fd4e045ea6
comparison
equal deleted inserted replaced
387:f892a9d0bb8d 388:aabb7f5b1c81
65 (setq load-path (paths-construct-load-path roots 65 (setq load-path (paths-construct-load-path roots
66 '() 66 '()
67 late-package-load-path 67 late-package-load-path
68 '() 68 '()
69 lisp-directory 69 lisp-directory
70 site-directory))) 70 site-directory))
71
72 (setq module-directory (paths-find-module-directory roots))
73 (if debug-paths
74 (princ (format "module-directory:\n%S\n" module-directory)
75 'external-debugging-output))
76 (setq site-module-directory (and (null inhibit-site-modules)
77 (paths-find-site-module-directory roots)))
78 (if (and debug-paths (null inhibit-site-modules))
79 (princ (format "site-module-directory:\n%S\n" site-module-directory)
80 'external-debugging-output))
81
82 (setq module-load-path (paths-construct-module-load-path roots
83 module-directory
84 site-module-directory)))
71 85
72 ;;; dump-paths.el ends here 86 ;;; dump-paths.el ends here