From d9f2959ea6e031ac9627c19029b5bc940e07fad2 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Mon, 4 Dec 2006 16:49:31 +0000 Subject: [PATCH] (facemenu-unlisted-faces): Put obsolescence info in the call to `make-obsolete-variable', not in the docstring. --- lisp/facemenu.el | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/lisp/facemenu.el b/lisp/facemenu.el index a489244728c..f767c8d4e26 100644 --- a/lisp/facemenu.el +++ b/lisp/facemenu.el @@ -137,10 +137,9 @@ just before \"Other\" at the end." ,(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) + "*List of faces that are of no interest to the user.") +(make-obsolete-variable 'facemenu-unlisted-faces 'facemenu-listed-faces + "since 22.1,\nand has no effect on the Face menu") (defcustom facemenu-listed-faces nil "*List of faces to include in the Face menu. -- 2.39.5