Index: emacs/lisp/emacs-lisp/debug.el
diff -c emacs/lisp/emacs-lisp/debug.el:1.85 emacs/lisp/emacs-lisp/debug.el:1.86
*** emacs/lisp/emacs-lisp/debug.el:1.85 Mon Jun 13 08:13:16 2005
--- emacs/lisp/emacs-lisp/debug.el Mon Jun 13 23:40:05 2005
***************
*** 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)))
(when name
(unless (string= name "")
(intern name))))))
--- 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)))
(when name
(unless (string= name "")
(intern name))))))
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
