diff options
Diffstat (limited to 'lisp/loadup.el')
| -rw-r--r-- | lisp/loadup.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/loadup.el b/lisp/loadup.el index 5c33e02cbc7..e4fabb73c15 100644 --- a/lisp/loadup.el +++ b/lisp/loadup.el @@ -34,14 +34,14 @@ (equal (nth 4 command-line-args) "bootstrap") ;; in case CANNOT_DUMP (equal (nth 0 command-line-args) "../src/bootstrap-emacs")) - (let ((path (car load-path))) + (let ((dir (car load-path))) ;; We'll probably overflow the pure space. (setq purify-flag nil) - (setq load-path (list path - (expand-file-name "emacs-lisp" path) - (expand-file-name "language" path) - (expand-file-name "international" path) - (expand-file-name "textmodes" path))))) + (setq load-path (list dir + (expand-file-name "emacs-lisp" dir) + (expand-file-name "language" dir) + (expand-file-name "international" dir) + (expand-file-name "textmodes" dir))))) (message "Using load-path %s" load-path) |