Mercurial > hg > xemacs-beta

comparison lisp/startup.el @ 4093:86f900725eda

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2007-08-02 06:37:48 by michaels] 2007-08-02 Mike Sperber <mike@xemacs.org> * startup.el (startup-setup-paths): Fix typo in init expression for `emacs-roots'.
author michaels
date Thu, 02 Aug 2007 06:37:53 +0000
parents 92013722573f
children ff446f61f88f
comparison
equal deleted inserted replaced
4092:9c0151d05116 4093:86f900725eda
1450 (setq debug-paths (or debug-paths 1450 (setq debug-paths (or debug-paths
1451 (and (getenv "EMACSDEBUGPATHS") 1451 (and (getenv "EMACSDEBUGPATHS")
1452 t))) 1452 t)))
1453 1453
1454 (setq emacs-roots (paths-find-emacs-roots invocation-directory invocation-name 1454 (setq emacs-roots (paths-find-emacs-roots invocation-directory invocation-name
1455 #'paths-emacs-data-root-p)) 1455 #'paths-emacs-root-p))
1456 1456
1457 (setq emacs-data-roots (paths-find-emacs-roots invocation-directory invocation-name 1457 (setq emacs-data-roots (paths-find-emacs-roots invocation-directory invocation-name
1458 #'paths-emacs-data-root-p)) 1458 #'paths-emacs-data-root-p))
1459 1459
1460 (if (null emacs-roots) 1460 (if (null emacs-roots)