diff options
author | Luc Teirlinck <teirllm@auburn.edu> | 2005-06-13 23:40:05 +0000 |
---|---|---|
committer | Luc Teirlinck <teirllm@auburn.edu> | 2005-06-13 23:40:05 +0000 |
commit | 922a9de3065637bdc2627fb4a5f19ef57a8cc0d5 (patch) | |
tree | e463b4b4e20e523e0fccd899625725ed843dd91c /lisp/emacs-lisp | |
parent | 7efb41ae95a6d36405d519e0f958ffea44fdc816 (diff) | |
download | emacs-922a9de3065637bdc2627fb4a5f19ef57a8cc0d5.tar.gz emacs-922a9de3065637bdc2627fb4a5f19ef57a8cc0d5.tar.bz2 emacs-922a9de3065637bdc2627fb4a5f19ef57a8cc0d5.zip |
(cancel-debug-on-entry): Mention default in minibuffer prompt.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/debug.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el index 795c6418e5a..0745508b64b 100644 --- a/lisp/emacs-lisp/debug.el +++ b/lisp/emacs-lisp/debug.el @@ -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)))))) |