From 76a1a8a64f5b581d63b981361a8698c99de5dbdc Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 24 Sep 2006 20:39:22 +0000 Subject: [PATCH] (fancy-splash-screens, normal-splash-screen): Call the splash buffer *About GNU Emacs*. --- lisp/startup.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/startup.el b/lisp/startup.el index 3db972c3d23..cd256f2ced0 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -1389,7 +1389,7 @@ mouse." (if (or (window-minibuffer-p) (window-dedicated-p (selected-window))) (pop-to-buffer (current-buffer)) - (switch-to-buffer "GNU Emacs")) + (switch-to-buffer "*About GNU Emacs*")) (setq buffer-read-only nil) (erase-buffer) (if pure-space-overflow @@ -1605,7 +1605,9 @@ Type \\[describe-distribution] for information on getting the latest version.")) (error (pop-to-buffer (current-buffer)))))) ;; Unwind ... ensure splash buffer is killed (if hide-on-input - (kill-buffer "GNU Emacs"))))) + (kill-buffer "GNU Emacs") + (switch-to-buffer "GNU Emacs") + (rename-buffer "*About GNU Emacs*" t))))) (defun startup-echo-area-message () -- 2.39.2