HCoop
/
bpt
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
cb3fb87
)
(shell-command-on-region): Cope with exit-status being
author
Andreas Schwab
<schwab@suse.de>
Sat, 27 Mar 1999 02:40:48 +0000
(
02:40
+0000)
committer
Andreas Schwab
<schwab@suse.de>
Sat, 27 Mar 1999 02:40:48 +0000
(
02:40
+0000)
nil, which happens if call-process-region was interrupted.
lisp/simple.el
patch
|
blob
|
blame
|
history
diff --git
a/lisp/simple.el
b/lisp/simple.el
index
eb4f7a3
..
61d031d
100644
(file)
--- a/
lisp/simple.el
+++ b/
lisp/simple.el
@@
-1324,7
+1324,7
@@
specifies the value of ERROR-BUFFER."
(list buffer error-file)
buffer)
nil shell-command-switch command)))
- (setq success (
zerop exit-status
))
+ (setq success (
and exit-status (zerop exit-status)
))
;; Report the amount of output.
(let ((lines (save-excursion
(set-buffer buffer)