From: Gerd Moellmann Date: Tue, 19 Sep 2000 15:00:29 +0000 (+0000) Subject: (fancy-splash-delay, fancy-splash-image): Add X-Git-Tag: emacs-pretest-21.0.90~1522 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a01bb1db13758f6fb457a506fbd0ab4a02d6615a;p=emacs.git (fancy-splash-delay, fancy-splash-image): Add version. (fancy-splash-screen): Defgroup. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 5598ff181f3..15486ebc471 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,9 @@ 2000-09-19 Gerd Moellmann + * startup.el (fancy-splash-delay, fancy-splash-image): Add + :version. + (fancy-splash-screen): Defgroup. + * add-log.el (change-log-font-lock-keywords): Match names more exactly for the case that font-lock-constant-face is underlined. diff --git a/lisp/startup.el b/lisp/startup.el index bb2bb667be3..8d7f62319a1 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -873,15 +873,22 @@ Each element in the list should be a list of strings or pairs `:face FACE', like `fancy-splash-insert' accepts them.") +(defgroup 'fancy-splash-screen + "Fancy splash screen when Emacs starts." + :group 'initialization) + + (defcustom fancy-splash-delay 5 "Delay in seconds between splash screens." - :group 'splash-screen + :group 'fancy-splash-screen + :version "21.1" :type 'integer) (defcustom fancy-splash-image "splash.xpm" "The image to show in the splash screens." - :group 'splash-screen + :group 'fancy-splash-screen + :version "21.1" :type 'file)