Commit 922a9de3 authored by Luc Teirlinck's avatar Luc Teirlinck
Browse files

(cancel-debug-on-entry): Mention default in minibuffer prompt.

parent 7efb41ae
......@@ -698,9 +698,9 @@ When called interactively, prompt for FUNCTION in the minibuffer.
To specify a nil argument interactively, exit with an empty minibuffer."
(interactive
(list (let ((name
(completing-read "Cancel debug on entry (to function): "
(mapcar 'symbol-name debug-function-list)
nil t)))
(completing-read
"Cancel debug on entry to function (default: all functions): "
(mapcar 'symbol-name debug-function-list) nil t)))
(when name
(unless (string= name "")
(intern name))))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment