Commit d9a71a8f authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(command-line-1): Improve previous change.

parent 1d7da582
......@@ -344,12 +344,14 @@ this variable, if non-nil; 2. `~/.emacs'; 3. `default.el'.")
(insert-file-contents user-init-file)
"(setq inhibit-startup-echo-area-message[ \t]+"
"([ \t\n]*setq[ \t\n]+"
"inhibit-startup-echo-area-message[ \t\n]+"
(if (string= init-file-user "")
"[ \t]*)")
"[ \t\n]*)")
nil t))
(error nil))
(kill-buffer buffer))))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment