andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Make `describe-function' say that disabled functions are disabled

Browse source 
* lisp/help-fns.el (help-fns--disabled): New function (bug#10853).
(help-fns-describe-function-functions): Add it to the list of
function help functions.
This commit is contained in:
Lars Ingebrigtsen 2019-08-17 16:56:13 -07:00
parent 3efe59a8dd
commit f38a16ee89
1 changed files with 6 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/help-fns.el
View file

@ -593,6 +593,12 @@ FILE is the file where FUNCTION was probably defined."
(insert " This function does not change global state, "
"including the match data.\n")))
(add-hook 'help-fns-describe-function-functions #'help-fns--disabled)
(defun help-fns--disabled (function)
(when (and (symbolp function)
(function-get function 'disabled))
(insert " This function is disabled.\n")))
(defun help-fns--first-release (symbol)
"Return the likely first release that defined SYMBOL, or nil."
;; Code below relies on the etc/NEWS* files.