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." (defun debugger-continue () "Continue, evaluating this expression without stopping." (interactive) + (unless debugger-may-continue + (error "Cannot continue")) (message "Continuing.") (exit-recursive-edit))