# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 932881496 0
# Node ID a29c760f50ee318216bdba4d3cb2843ab37e5558
# Parent  888326cb8ffb4946430bd737c9c9b7198dc95b25
(command-line): If we don't find the user's init file,
set user-init-file to nil.

diff -r 888326cb8ffb -r a29c760f50ee lisp/startup.el
--- a/lisp/startup.el	Sat Jul 24 13:11:43 1999 +0000
+++ b/lisp/startup.el	Sun Jul 25 05:44:56 1999 +0000
@@ -724,6 +724,11 @@
 		    ;; into user-init-file.
 		    (setq user-init-file t)
 		    (load user-init-file-1 t t)
+		    ;; If we did not find the user's init file,
+		    ;; set user-init-file conclusively to nil;
+		    ;; don't let it be set from default.el.
+		    (if (eq user-init-file t)
+			(setq user-init-file nil))
 		    (or inhibit-default-init
 			(let ((inhibit-startup-message nil))
 			  ;; Users are supposed to be told their rights.