XEmacs 21.2.31 "Iris".

[chise/xemacs-chise.git] / lisp / update-elc.el

diff --git a/lisp/update-elc.el b/lisp/update-elc.el
index 8a4527a..f88a853 100644 (file)
--- a/lisp/update-elc.el
+++ b/lisp/update-elc.el
@@ -62,7 +62,8 @@
 ;                  ;; -batch gets filtered out.
 ;                  (nthcdr 3 command-line-args))))
 
-(setq load-path (split-path (getenv "EMACSBOOTSTRAPLOADPATH")))
+(let ((build-root (expand-file-name ".." invocation-directory)))
+  (setq load-path (list (expand-file-name "lisp" build-root))))
 
 (load "very-early-lisp" nil t)