diff options
| author | Ricardo Wurmus <rekado@elephly.net> | 2018-11-08 10:09:32 +0100 |
|---|---|---|
| committer | Ricardo Wurmus <rekado@elephly.net> | 2018-11-08 10:09:32 +0100 |
| commit | ec618c2005a1dc5e5154d25e9599313cea1ce6e9 (patch) | |
| tree | e164a1135050560129f6d65f720f943071abeca1 | |
| parent | 9c30cba431ccc36462f91652b624ae0068d77491 (diff) | |
| download | guix-ec618c2005a1dc5e5154d25e9599313cea1ce6e9.tar.gz guix-ec618c2005a1dc5e5154d25e9599313cea1ce6e9.zip | |
gnu: cmus: Use INVOKE.
* gnu/packages/music.scm (cmus)[arguments]: Use INVOKE and return #T
unconditionally.
| -rw-r--r-- | gnu/packages/music.scm | 18 |
1 files changed, 8 insertions, 10 deletions
diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm index 7f1d124233..af7589c23d 100644 --- a/gnu/packages/music.scm +++ b/gnu/packages/music.scm @@ -322,16 +322,14 @@ playing your music.") `(#:tests? #f ; cmus does not include tests #:phases (modify-phases %standard-phases - (replace - 'configure - (lambda* (#:key outputs #:allow-other-keys) - (let ((out (assoc-ref outputs "out"))) - - ;; It's an idiosyncratic configure script that doesn't - ;; understand --prefix=..; it wants prefix=.. instead. - (zero? - (system* "./configure" - (string-append "prefix=" out))))))))) + (replace 'configure + (lambda* (#:key outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out"))) + ;; It's an idiosyncratic configure script that doesn't + ;; understand --prefix=..; it wants prefix=.. instead. + (invoke "./configure" + (string-append "prefix=" out)) + #t)))))) ;; TODO: cmus optionally supports the following formats, which haven't yet ;; been added to Guix: ;; |