# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1274401378 25200
# Node ID 66c9aef964ccf8e4b0953a49a399bcbfc9957d03
# Parent  57f3f40827c143a5e5c29d1d3b65453dff3e0f44
Minor loadup.el fix.
* lisp/loadup.el [CANNOT_DUMP]: Update for bootstrap-emacs no longer
having a relative path in src/Makefile.in.

diff -r 57f3f40827c1 -r 66c9aef964cc lisp/ChangeLog
--- a/lisp/ChangeLog	Fri May 21 02:54:55 2010 +0300
+++ b/lisp/ChangeLog	Thu May 20 17:22:58 2010 -0700
@@ -1,3 +1,8 @@
+2010-05-21  Glenn Morris  <rgm@gnu.org>
+
+	* loadup.el [CANNOT_DUMP]: Update for bootstrap-emacs no longer
+	having a relative path in src/Makefile.in.
+
 2010-05-20  Kevin Ryde  <user42@zip.com.au>
 
 	* help-mode.el (help-make-xrefs): For Info node links turn
diff -r 57f3f40827c1 -r 66c9aef964cc lisp/loadup.el
--- a/lisp/loadup.el	Fri May 21 02:54:55 2010 +0300
+++ b/lisp/loadup.el	Thu May 20 17:22:58 2010 -0700
@@ -54,7 +54,7 @@
 	(equal (nth 3 command-line-args) "unidata-gen.el")
 	(equal (nth 4 command-line-args) "unidata-gen-files")
 	;; In case CANNOT_DUMP.
-	(equal (nth 0 command-line-args) "../src/bootstrap-emacs"))
+	(string-match "src/bootstrap-emacs" (nth 0 command-line-args)))
     (let ((dir (car load-path)))
       ;; We'll probably overflow the pure space.
       (setq purify-flag nil)