* loadup.el (top level): Adjust load path if program name is

"../src/bootstrap-emacs", in case it's not dumped and thus the load path
adjustment hasn't already been done.

lisp/ChangeLog

+2000-10-31  Ken Raeburn  <raeburn@gnu.org>
+
+	* loadup.el (top level): Adjust load path if program name is
+	"../src/bootstrap-emacs", in case it's not dumped and thus the
+	load path adjustment hasn't already been done.
+
 2000-10-31  Vinicius Jose Latorre  <vinicius@cpqd.com.br>
 
 	* ps-print.el: Fix bug on selected pages for printing.  Use

lisp/loadup.el

@@ -31,7 +31,9 @@
 ;; add subdirectories to the load-path for files that might
 ;; get autoloaded when bootstrapping
 (if (or (equal (nth 3 command-line-args) "bootstrap")
-	(equal (nth 4 command-line-args) "bootstrap"))
+	(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)))
       (setq load-path (list path
 			    (expand-file-name "emacs-lisp" path)