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 | ed50f0d2334b6215a1f0514a8c4a1abebe9f100b (patch) | |
| tree | 62194d6d73540be3644ab4d4039e164cec14c26c /lisp/facemenu.el | |
| parent | f48658df7c1dbcc3f4d2b19f83ad681be6031f02 (diff) | |
| download | emacs-ed50f0d2334b6215a1f0514a8c4a1abebe9f100b.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. |