[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 9d9798521e 2/3: Don't mention obsolete generalized variables in *
From: |
Lars Ingebrigtsen |
Subject: |
master 9d9798521e 2/3: Don't mention obsolete generalized variables in *Help* |
Date: |
Tue, 23 Aug 2022 06:29:15 -0400 (EDT) |
branch: master
commit 9d9798521e3457506c08ff9cb6c0d3069c30af00
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Don't mention obsolete generalized variables in *Help*
* lisp/help-fns.el (help-fns--generalized-variable): Don't mention
obsolete ones.
---
lisp/help-fns.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index e06f2dec5c..1ccf9bb428 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -1156,7 +1156,9 @@ Returns a list of the form (REAL-FUNCTION DEF ALIASED
REAL-DEF)."
(add-hook 'help-fns-describe-function-functions #'help-fns--compiler-macro 100)
(defun help-fns--generalized-variable (function)
- (when (get function 'gv-expander)
+ (when (and (get function 'gv-expander)
+ ;; Don't mention obsolete generalized variables.
+ (not (get function 'byte-obsolete-generalized-variable)))
(insert (format-message " `%s' is also a " function)
(buttonize "generalized variable"
(lambda (_) (info "(elisp)Generalized Variables")))