summaryrefslogtreecommitdiff
path: root/lisp/facemenu.el
diff options
context:
space:
mode:
authorChong Yidong <cyd@stupidchicken.com>2006-12-04 16:09:21 +0000
committerChong Yidong <cyd@stupidchicken.com>2006-12-04 16:09:21 +0000
commit6f15161a7dfffaab7b65efc814e7384e4d9841ce (patch)
treeca09cd27697e92831ebe924a9acead79ef108539 /lisp/facemenu.el
parentf880bda73f2ba15bda1cf7de4335ab3d25cb967f (diff)
downloademacs-6f15161a7dfffaab7b65efc814e7384e4d9841ce.tar.gz
(facemenu-unlisted-faces): Define as obsolete variable.
Diffstat (limited to 'lisp/facemenu.el')
-rw-r--r--lisp/facemenu.el10
1 files changed, 10 insertions, 0 deletions
diff --git a/lisp/facemenu.el b/lisp/facemenu.el
index 3db19342304..a489244728c 100644
--- a/lisp/facemenu.el
+++ b/lisp/facemenu.el
@@ -132,6 +132,16 @@ just before \"Other\" at the end."
: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.