Mercurial > emacs

changeset 34331:7b91d8c3787f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(facemenu-unlisted-faces): Fix value.
author Dave Love <fx@gnu.org>
date Thu, 07 Dec 2000 12:14:08 +0000
parents 8b1375dbcbc6
children 8a132d69a4df
files lisp/facemenu.el
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/facemenu.el	Thu Dec 07 12:12:08 2000 +0000
+++ b/lisp/facemenu.el	Thu Dec 07 12:14:08 2000 +0000
@@ -136,10 +136,10 @@
   :group 'facemenu)
 
 (defcustom facemenu-unlisted-faces
-  '(modeline region secondary-selection highlight scratch-face
-    (purecopy "^font-lock-") (purecopy "^gnus-") (purecopy "^message-")
-    (purecopy "^ediff-") (purecopy "^term-") (purecopy "^vc-")
-    (purecopy "^widget-") (purecopy "^custom-") (purecopy "^vm-"))
+  `(modeline region secondary-selection highlight scratch-face
+    ,(purecopy "^font-lock-") ,(purecopy "^gnus-") ,(purecopy "^message-")
+    ,(purecopy "^ediff-") ,(purecopy "^term-") ,(purecopy "^vc-")
+    ,(purecopy "^widget-") ,(purecopy "^custom-") ,(purecopy "^vm-"))
   "*List of faces not to include in the Face menu.
 Each element may be either a symbol, which is the name of a face, or a string,
 which is a regular expression to be matched against face names.  Matching