diff options
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/debug.el | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el index 8c81dbd0bd8..a0165a8d198 100644 --- a/lisp/emacs-lisp/debug.el +++ b/lisp/emacs-lisp/debug.el @@ -633,11 +633,7 @@ If argument is nil or an empty string, cancel for all functions." (interactive (list (let ((name (completing-read "Cancel debug on entry (to function): " - ;; Make an "alist" of the functions - ;; that now have debug on entry. - (mapcar 'list - (mapcar 'symbol-name - debug-function-list)) + (mapcar 'symbol-name debug-function-list) nil t nil))) (if name (intern name))))) (debugger-reenable) |