# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 945609148 0
# Node ID 5385b12ef9a84f18d38cd83d369e6a5c5400f8f4
# Parent  7987a6499aaa85bd9d0ac8b21fb33274d70af134
(debugger-continue): Don't continue If
debugger-may-continue is nil.

diff -r 7987a6499aaa -r 5385b12ef9a8 lisp/emacs-lisp/debug.el
--- a/lisp/emacs-lisp/debug.el	Sun Dec 19 13:07:33 1999 +0000
+++ b/lisp/emacs-lisp/debug.el	Sun Dec 19 13:12:28 1999 +0000
@@ -280,6 +280,8 @@
 (defun debugger-continue ()
   "Continue, evaluating this expression without stopping."
   (interactive)
+  (unless debugger-may-continue
+    (error "Cannot continue"))
   (message "Continuing.")
   (exit-recursive-edit))