[Emacs-diffs] Changes to emacs/lisp/facemenu.el,v

[Chong Yidong]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Chong Yidong <cyd>      06/12/04 16:09:21

Index: facemenu.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/facemenu.el,v
retrieving revision 1.92
retrieving revision 1.93
diff -u -b -r1.92 -r1.93
--- facemenu.el 28 Nov 2006 02:19:58 -0000      1.92
+++ facemenu.el 4 Dec 2006 16:09:21 -0000       1.93
@@ -132,6 +132,16 @@
   :type 'boolean
   :group 'facemenu)
 
+(defvar 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-"))
+  "*List of faces that are of no interest to the user.
+This variable is obsolete, and has no effect on the Face menu.
+Use the variable `facemenu-listed-faces' instead.")
+(make-obsolete-variable 'facemenu-unlisted-faces 'facemenu-listed-faces)
+
 (defcustom facemenu-listed-faces nil
   "*List of faces to include in the Face menu.
 Each element should be a symbol, the name of a face.