From b831c087d8b6265447d6ca75a8ac565b25edac0e Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Mon, 2 Oct 2000 11:18:21 +0000 Subject: [PATCH] (fancy-splash-head): Change message below the logo. --- lisp/startup.el | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/lisp/startup.el b/lisp/startup.el index 43e8bb7d20d..ac29ad87a9e 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -952,10 +952,13 @@ where FACE is a valid face specification, as it can be used with (insert-image img (propertize "xxx" 'help-echo help-echo 'keymap map))) (insert "\n")))) - (when (eq system-type 'gnu/linux) + (if (eq system-type 'gnu/linux) + (fancy-splash-insert + :face '(variable-pitch :foreground "red") + "GNU Emacs is one component of a Linux-based GNU system.") (fancy-splash-insert :face '(variable-pitch :foreground "red") - "GNU Emacs is one component of a Linux-based GNU system.")) + "GNU Emacs is one component of the GNU operating system.")) (insert "\n")) -- 2.39.2