summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorLuc Teirlinck <teirllm@auburn.edu>2005-06-13 23:40:05 +0000
committerLuc Teirlinck <teirllm@auburn.edu>2005-06-13 23:40:05 +0000
commit922a9de3065637bdc2627fb4a5f19ef57a8cc0d5 (patch)
treee463b4b4e20e523e0fccd899625725ed843dd91c /lisp/emacs-lisp
parent7efb41ae95a6d36405d519e0f958ffea44fdc816 (diff)
downloademacs-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.el6
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))))))