# HG changeset patch
# User Luc Teirlinck <teirllm@auburn.edu>
# Date 1118706005 0
# Node ID cb9b98ba1f83df21dcc8f5ff93cd0dc531dd239b
# Parent  73a4ef6b8237a275e4e60f53c40e7b74d069d20e
(cancel-debug-on-entry): Mention default in minibuffer prompt.

diff -r 73a4ef6b8237 -r cb9b98ba1f83 lisp/emacs-lisp/debug.el
--- a/lisp/emacs-lisp/debug.el	Mon Jun 13 23:38:30 2005 +0000
+++ b/lisp/emacs-lisp/debug.el	Mon Jun 13 23:40:05 2005 +0000
@@ -698,9 +698,9 @@
 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))))))