/[emacs]/emacs/lisp/emacs-lisp/debug.el
ViewVC logotype

Diff of /emacs/lisp/emacs-lisp/debug.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.85 by lute, Mon Jun 13 08:13:16 2005 UTC revision 1.86 by teirllm, Mon Jun 13 23:40:05 2005 UTC
# Line 698  When called interactively, prompt for FU Line 698  When called interactively, prompt for FU
698  To specify a nil argument interactively, exit with an empty minibuffer."  To specify a nil argument interactively, exit with an empty minibuffer."
699    (interactive    (interactive
700     (list (let ((name     (list (let ((name
701                  (completing-read "Cancel debug on entry (to function): "                  (completing-read
702                                   (mapcar 'symbol-name debug-function-list)                   "Cancel debug on entry to function (default: all functions): "
703                                   nil t)))                   (mapcar 'symbol-name debug-function-list) nil t)))
704             (when name             (when name
705               (unless (string= name "")               (unless (string= name "")
706                 (intern name))))))                 (intern name))))))

Legend:
Removed from v.1.85  
changed lines
  Added in v.1.86

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26