github/melpa
1
0
Fork 0
mirror of https://github.com/correl/melpa.git synced 2024-12-18 19:21:32 +00:00
Code Issues Projects Releases Packages Wiki Activity

Improve debug information when running process fail.

Browse source
This commit is contained in:
Johan Andersson 2014-01-28 19:06:30 +01:00
parent f3ea2a3c60
commit 4a0b7b0163
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
package-build.el
View file

@ -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."