mirror of
https://github.com/correl/melpa.git
synced 2024-11-14 19:19:32 +00:00
Raise error when 'pb/run-process exits with a non-zero code.
This commit is contained in:
parent
7bbdcf7839
commit
3697b36d06
1 changed files with 4 additions and 1 deletions
|
@ -83,7 +83,10 @@
|
|||
"In DIR (or `default-directory' if unset) run command PROG with ARGS.
|
||||
Output is written to the current buffer."
|
||||
(let ((default-directory (or dir default-directory)))
|
||||
(apply 'process-file prog nil (current-buffer) t args)))
|
||||
(let ((exit-code (apply 'process-file prog nil (current-buffer) t args)))
|
||||
(unless (zerop exit-code)
|
||||
(error "Program '%s' with args '%s' exited with non-zero status %d"
|
||||
prog args exit-code)))))
|
||||
|
||||
|
||||
(defun pb/checkout (name config cwd)
|
||||
|
|
Loading…
Reference in a new issue