[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master c8a586c1db 1/4: Don't list obsolete in "other commands" help sect
From: |
Stefan Kangas |
Subject: |
master c8a586c1db 1/4: Don't list obsolete in "other commands" help section |
Date: |
Thu, 21 Jul 2022 03:23:37 -0400 (EDT) |
branch: master
commit c8a586c1db7fe7c848fe29a01277acdeac8999b1
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>
Don't list obsolete in "other commands" help section
* lisp/help-fns.el (help-fns--list-local-commands): Don't list
obsolete commands.
---
lisp/help-fns.el | 2 ++
1 file changed, 2 insertions(+)
diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 620b7666f6..dc64a09f3d 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -2195,6 +2195,8 @@ documentation for the major and minor modes of that
buffer."
(when (and (commandp sym)
;; Ignore aliases.
(not (symbolp (symbol-function sym)))
+ ;; Ignore obsolete commands.
+ (not (get sym 'byte-obsolete-info))
;; Ignore everything bound.
(not (where-is-internal sym nil t))
(apply #'derived-mode-p (command-modes sym)))