diff --git a/lisp/help-fns.el b/lisp/help-fns.el index 7c059c25b79..90a35715204 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -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.