# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1010784914 0
# Node ID d8ac9a604877296a2aae0f14ee25d766c631b16f
# Parent  76fc84e8802f0a0a12226f566eef311d65a598ea
(initial-scratch-message): Fix custom type, add group.

diff -r 76fc84e8802f -r d8ac9a604877 lisp/startup.el
--- a/lisp/startup.el	Fri Jan 11 21:29:13 2002 +0000
+++ b/lisp/startup.el	Fri Jan 11 21:35:14 2002 +0000
@@ -1024,7 +1024,9 @@
 ")
   "Initial message displayed in *scratch* buffer at startup.
 If this is nil, no message will be displayed."
-  :type 'string)
+  :type '(choice (text :tag "Message")
+		 (const :tag "none" nil))
+  :group 'initialization)
 
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;