diff options
| author | Chong Yidong <cyd@stupidchicken.com> | 2008-08-28 18:10:01 +0000 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2008-08-28 18:10:01 +0000 |
| commit | f3bb3e68956bccd031885f7452ee11aafebc0069 (patch) | |
| tree | 231102f671191728a1f31553ea8c1e013a06867a /lisp/emacs-lisp | |
| parent | f50f0aa2ea188517fe25dbb60b940beba579ff98 (diff) | |
| download | emacs-f3bb3e68956bccd031885f7452ee11aafebc0069.tar.gz | |
(debug): When killing a noninteractive Emacs, give exit status -1.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/debug.el | 2 |
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)) |