1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el
index 4a4d744b37f..704e4775b8c 100644
--- a/lisp/emacs-lisp/debug.el
+++ b/lisp/emacs-lisp/debug.el
@@ -200,7 +200,7 @@ first will be printed into the backtrace buffer."
                     (insert "...\n"))
                   (goto-char (point-min))
                   (message "%s" (buffer-string))
-                  (kill-emacs))
+                  (kill-emacs -1))
                 (message "")
                 (let ((standard-output nil)
                       (buffer-read-only t))