# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 969454761 0
# Node ID 57964eceb2e22b12522399a0bea12f7cc9ed8594
# Parent  54ae1def18cf69a49f28170ebe77b0d58a618fb0
(fancy-splash-text): Don't quote faces.

diff -r 54ae1def18cf -r 57964eceb2e2 lisp/startup.el
--- a/lisp/startup.el	Wed Sep 20 11:46:48 2000 +0000
+++ b/lisp/startup.el	Wed Sep 20 12:59:21 2000 +0000
@@ -842,12 +842,12 @@
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 (defvar fancy-splash-text
-  '((:face 'variable-pitch
+  '((:face variable-pitch
 	   "The menu bar and scroll bar are sufficient \
 for basic editing with the mouse.\n\n"
-	   :face '(variable-pitch :weight bold)
+	   :face (variable-pitch :weight bold)
 	   "Useful Files menu items:\n"
-	   :face 'variable-pitch "\
+	   :face variable-pitch "\
 Exit Emacs		(or type Control-x followed by Control-c)
 Recover Session		recover files you were editing before a crash
 
@@ -857,15 +857,15 @@
   (:face 'variable-pitch
 	   "The menu bar and scroll bar are sufficient \
 for basic editing with the mouse.\n\n"
-	   :face '(variable-pitch :weight bold)
+	   :face (variable-pitch :weight bold)
 	   "Important Help menu items:\n"
-	   :face 'variable-pitch "\
+	   :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 "
-	   :face '(variable-pitch :slant oblique)
+	   :face (variable-pitch :slant oblique)
 	   "ABSOLUTELY NO WARRANTY\n"
-	   :face `variable-pitch
+	   :face variable-pitch
 	   "Copying Conditions	Conditions for redistributing and \
 changing Emacs\n"))
   "A list of texts to show in the middle part of splash screens.