Use called-interactively-p' instead of
interactive-p'.
This commit is contained in:
parent
12a3c28c78
commit
32226619c5
81 changed files with 375 additions and 204 deletions
|
@ -873,7 +873,8 @@ To specify a nil argument interactively, exit with an empty minibuffer."
|
|||
"Display a list of all the functions now set to debug on entry."
|
||||
(interactive)
|
||||
(require 'help-mode)
|
||||
(help-setup-xref '(debugger-list-functions) (interactive-p))
|
||||
(help-setup-xref '(debugger-list-functions)
|
||||
(called-interactively-p 'interactive))
|
||||
(with-output-to-temp-buffer (help-buffer)
|
||||
(with-current-buffer standard-output
|
||||
(if (null debug-function-list)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue