Mercurial > emacs
changeset 33169:4a73f3e3bd29
(fancy-splash-text, fancy-splash-text): Use a single
tab character.
(fancy-splash-screens): Set tab-width to 20.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Fri, 03 Nov 2000 12:24:41 +0000 |
parents | 311d750d69c1 |
children | 74b99e79dc02 |
files | lisp/startup.el |
diffstat | 1 files changed, 7 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/startup.el Fri Nov 03 11:39:15 2000 +0000 +++ b/lisp/startup.el Fri Nov 03 12:24:41 2000 +0000 @@ -954,8 +954,8 @@ :face (variable-pitch :weight bold) "Useful Files menu items:\n" :face variable-pitch "\ -Exit Emacs (or type Control-x followed by Control-c) -Recover Session recover files you were editing before a crash +Exit Emacs\t(or type Control-x followed by Control-c) +Recover Session\trecover files you were editing before a crash " @@ -966,14 +966,14 @@ :face (variable-pitch :weight bold) "Important Help menu items:\n" :face variable-pitch "\ -Emacs Tutorial Learn-by-doing tutorial for using Emacs efficiently. -Emacs FAQ Frequently asked questions and answers -\(Non)Warranty GNU Emacs comes with " +Emacs Tutorial\tLearn-by-doing tutorial for using Emacs efficiently. +Emacs FAQ\tFrequently asked questions and answers +\(Non)Warranty\tGNU Emacs comes with " :face (variable-pitch :slant oblique) "ABSOLUTELY NO WARRANTY\n" :face variable-pitch "\ -Copying Conditions Conditions for redistributing and changing Emacs\n")) +Copying Conditions\tConditions for redistributing and changing Emacs\n")) "A list of texts to show in the middle part of splash screens. Each element in the list should be a list of strings or pairs `:face FACE', like `fancy-splash-insert' accepts them.") @@ -1103,6 +1103,7 @@ "Display fancy splash screens when Emacs starts." (setq fancy-splash-help-echo (startup-echo-area-message)) (switch-to-buffer "GNU Emacs") + (setq tab-width 20) (let ((old-busy-cursor display-busy-cursor) (splash-buffer (current-buffer)) timer)