diff options
author | Chong Yidong <cyd@stupidchicken.com> | 2006-12-04 16:09:21 +0000 |
---|---|---|
committer | Chong Yidong <cyd@stupidchicken.com> | 2006-12-04 16:09:21 +0000 |
commit | 6f15161a7dfffaab7b65efc814e7384e4d9841ce (patch) | |
tree | ca09cd27697e92831ebe924a9acead79ef108539 /lisp/facemenu.el | |
parent | f880bda73f2ba15bda1cf7de4335ab3d25cb967f (diff) | |
download | emacs-6f15161a7dfffaab7b65efc814e7384e4d9841ce.tar.gz |
(facemenu-unlisted-faces): Define as obsolete variable.
Diffstat (limited to 'lisp/facemenu.el')
-rw-r--r-- | lisp/facemenu.el | 10 |
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. |