(command-line): If we don't find the user's init file,

set user-init-file to nil.
This commit is contained in:
Karl Heuer 1999-07-25 05:44:56 +00:00
parent f687a8793d
commit 694e6b248d

View file

@ -724,6 +724,11 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'."
;; 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.