Mercurial > hg > xemacs-beta

comparison lisp/dump-paths.el @ 450:98528da0b7fc r21-2-40

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-40
author cvs
date Mon, 13 Aug 2007 11:39:20 +0200
parents 3ecd8885ac67
children 223736d75acb
comparison
equal deleted inserted replaced
449:c83749d23eb5 450:98528da0b7fc
26 26
27 ;;; Commentary: 27 ;;; Commentary:
28 28
29 ;; This sets up the various paths for continuing loading files for 29 ;; This sets up the various paths for continuing loading files for
30 ;; dumping. 30 ;; dumping.
31 ;; #### This code is duplicated in startup.el (startup-setup-paths).
31 32
32 (let ((debug-paths (or debug-paths 33 (let ((debug-paths (or debug-paths
33 (and (getenv "EMACSDEBUGPATHS") 34 (and (getenv "EMACSDEBUGPATHS")
34 t))) 35 t)))
35 (roots (paths-find-emacs-roots invocation-directory 36 (roots (paths-find-emacs-roots invocation-directory