diff options
| -rw-r--r-- | lisp/emacs-lisp/debug.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el index e5e2ac3c226..f21fdc5bfb5 100644 --- a/lisp/emacs-lisp/debug.el +++ b/lisp/emacs-lisp/debug.el | |||
| @@ -280,6 +280,8 @@ Enter another debugger on next entry to eval, apply or funcall." | |||
| 280 | (defun debugger-continue () | 280 | (defun debugger-continue () |
| 281 | "Continue, evaluating this expression without stopping." | 281 | "Continue, evaluating this expression without stopping." |
| 282 | (interactive) | 282 | (interactive) |
| 283 | (unless debugger-may-continue | ||
| 284 | (error "Cannot continue")) | ||
| 283 | (message "Continuing.") | 285 | (message "Continuing.") |
| 284 | (exit-recursive-edit)) | 286 | (exit-recursive-edit)) |
| 285 | 287 | ||