(fancy-splash-screen) <defgroup>: Fix syntax. Add

:version here.
(fancy-splash-delay, fancy-splash-image): Remove :version here.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a730d58f89dc665953ec67009c51fead279a895f..8a59d57101cc706f151a830ad2afb095c3d7734b 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2000-09-19  Dave Love  <fx@gnu.org>
+
+       * startup.el (fancy-splash-screen) <defgroup>: Fix syntax.  Add
+       :version here.
+       (fancy-splash-delay, fancy-splash-image): Remove :version here.
+
 2000-09-19  Gerd Moellmann  <gerd@gnu.org>
 
        * progmodes/sh-script.el (sh-search-word): Remove call to

diff --git a/lisp/startup.el b/lisp/startup.el
index 8d7f62319a1510e82253f7fd1aec09acdca81629..cacde7396d73453e0767b65a0f9e8a1a02aab22b 100644 (file)
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1,6 +1,6 @@
 ;;; startup.el --- process Emacs shell arguments
 
-;; Copyright (C) 1985, 86, 92, 94, 95, 96, 97, 1998, 1999 Free Software Foundation, Inc.
+;; Copyright (C) 1985, 86, 92, 94, 95, 96, 97, 98, 99, 2000 Free Software Foundation, Inc.
 
 ;; Maintainer: FSF
 ;; Keywords: internal
@@ -873,22 +873,21 @@ 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
+(defgroup fancy-splash-screen ()
   "Fancy splash screen when Emacs starts."
+  :version "21.1"
   :group 'initialization)
 
 
 (defcustom fancy-splash-delay 5
   "Delay in seconds between splash screens."
   :group 'fancy-splash-screen
-  :version "21.1"
   :type 'integer)
 
 
 (defcustom fancy-splash-image "splash.xpm"
   "The image to show in the splash screens."
   :group 'fancy-splash-screen
-  :version "21.1"
   :type 'file)