(debugger-continue): Don't continue If

debugger-may-continue is nil.

diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el
index e5e2ac3c22670216a9d318d572bbe795f699605f..f21fdc5bfb59c8f5c41cb8a9bf022339046c4e71 100644 (file)
--- 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))