ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-11 21:59:08 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

Revert "build-system/ruby: Use invoke."

Browse source 
This reverts commit 0244952c11.

We prefer 'invoke', but the custom error handling works better with the
code as-is.
This commit is contained in:
Efraim Flashner 2019-03-28 20:18:02 +02:00
parent 0244952c11
commit 7c86fdda7c
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351
1 changed files with 10 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
guix/build/ruby-build-system.scm
View file

@ -143,13 +143,16 @@ (define* (install #:key inputs outputs (gem-flags '())
(gem-dir (string-append vendor-dir "/gems/" gem-name)))
(setenv "GEM_VENDOR" vendor-dir)
(or (apply invoke "gem" "install" gem-file
"--verbose"
"--local" "--ignore-dependencies" "--vendor"
;; Executables should go into /bin, not
;; /lib/ruby/gems.
"--bindir" (string-append out "/bin")
gem-flags)
(or (zero?
;; 'zero? system*' allows the custom error handling to function as
;; expected, while 'invoke' raises its own exception.
(apply system* "gem" "install" gem-file
"--verbose"
"--local" "--ignore-dependencies" "--vendor"
;; Executables should go into /bin, not
;; /lib/ruby/gems.
"--bindir" (string-append out "/bin")
gem-flags))
(begin
(let ((failed-output-dir (string-append (getcwd) "/out")))
(mkdir failed-output-dir)