# HG changeset patch # User Richard M. Stallman # Date 1173030596 0 # Node ID ac1ac99d34549b0b3ead35e8b95256f265532427 # Parent d84c0ae58cc7572856fe418274fb660b05dd2ce1 (fancy-splash-text): Clarify text. diff -r d84c0ae58cc7 -r ac1ac99d3454 lisp/startup.el --- a/lisp/startup.el Sun Mar 04 17:48:56 2007 +0000 +++ b/lisp/startup.el Sun Mar 04 17:49:56 2007 +0000 @@ -1142,13 +1142,13 @@ ;; If there is a specific tutorial for the current language ;; environment and it is not English, append its title. (concat - "Emacs Tutorial\tLearn how to use Emacs efficiently" + "Emacs Tutorial\t\tLearn how to use Emacs efficiently" (if (string= en tut) "" (concat " (" title ")")) "\n"))) :face variable-pitch "\ -Emacs FAQ\tFrequently asked questions and answers +Emacs FAQ\t\tFrequently asked questions and answers View Emacs Manual\tView the Emacs manual using Info Absence of Warranty\tGNU Emacs comes with " :face (variable-pitch :slant oblique) @@ -1158,12 +1158,13 @@ Copying Conditions\tConditions for redistributing and changing Emacs Getting New Versions\tHow to obtain the latest version of Emacs More Manuals / Ordering Manuals Buying printed manuals from the FSF\n") - (:face (variable-pitch :weight bold) + (:face variable-pitch "To quit a partially entered command, type " :face default "Control-g" :face variable-pitch - "." + ".\n" + :face (variable-pitch :weight bold) "Useful File menu items:\n" :face variable-pitch "Exit Emacs\t\t(Or type " @@ -1295,8 +1296,7 @@ :face 'variable-pitch "Type " :face 'default - (substitute-command-keys - "\\[recenter]") + "Control-l" :face 'variable-pitch " to begin editing" (if (equal (buffer-name fancy-splash-outer-buffer)