From: Chong Yidong <cyd@stupidchicken.com>
Date: Thu, 28 Aug 2008 18:10:01 +0000 (+0000)
Subject: (debug): When killing a noninteractive Emacs, give exit status -1.
X-Git-Tag: emacs-pretest-23.0.90~3208
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f3bb3e68956bccd031885f7452ee11aafebc0069;p=emacs.git

(debug): When killing a noninteractive Emacs, give exit status -1.
---

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))