What about the following additional change:
===File ~/debug.el-diff=====================================
*** debug.el 11 Jun 2005 18:36:43 -0500 1.84
--- debug.el 11 Jun 2005 19:22:48 -0500
***************
*** 698,706 ****
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 nil)))
(if name (intern name)))))
(if (and function (not (string= function "")))
(progn
--- 698,706 ----
To specify a nil argument interactively, exit with an empty minibuffer."
(interactive
(list (let ((name
! (completing-read
! "Cancel debug on entry to function (default: all functions): "
! (mapcar 'symbol-name debug-function-list) nil t nil)))
(if name (intern name)))))
(if (and function (not (string= function "")))
(progn
============================================================
_______________________________________________
Emacs-devel mailing list
Emacs-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-devel
