mirror of
https://github.com/correl/melpa.git
synced 2024-11-14 19:19:32 +00:00
Improve debug information when running process fail.
This commit is contained in:
parent
f3ea2a3c60
commit
4a0b7b0163
1 changed files with 2 additions and 2 deletions
|
@ -155,8 +155,8 @@ Output is written to the current buffer."
|
|||
(cons command args))))
|
||||
(let ((exit-code (apply 'process-file (car argv) nil (current-buffer) t (cdr argv))))
|
||||
(unless (zerop exit-code)
|
||||
(error "Command '%s' exited with non-zero status %d"
|
||||
argv exit-code)))))
|
||||
(error "Command '%s' exited with non-zero status %d: %s"
|
||||
argv exit-code (buffer-string))))))
|
||||
|
||||
(defun pb/run-process-match (regex dir prog &rest args)
|
||||
"Find match for REGEX when - in DIR, or `default-directory' if unset - we run PROG with ARGS."
|
||||
|
|
Loading…
Reference in a new issue