From e5855e6f6bcccdeb49c44b10610458a1a72b888d Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Sat, 26 Jan 2019 22:22:30 +0100 Subject: gnu: guile-ncurses: Unconditionally return #T from build phases. * gnu/packages/guile.scm (guile-ncurses)[arguments]: Use INVOKE. --- gnu/packages/guile.scm | 24 ++++++++++++------------ 1 file changed, 12 insertions(+), 12 deletions(-) diff --git a/gnu/packages/guile.scm b/gnu/packages/guile.scm index 98221a83eb..b9580b0d7a 100644 --- a/gnu/packages/guile.scm +++ b/gnu/packages/guile.scm @@ -674,18 +674,18 @@ many readers as needed).") (modify-phases %standard-phases (add-before 'build 'fix-libguile-ncurses-file-name (lambda* (#:key outputs #:allow-other-keys) - (and (zero? (system* "make" "install" - "-C" "src/ncurses" - "-j" (number->string - (parallel-job-count)))) - (let* ((out (assoc-ref outputs "out")) - (dir "src/ncurses") - (files (find-files dir ".scm"))) - (substitute* files - (("\"libguile-ncurses\"") - (format #f "\"~a/lib/guile/2.2/libguile-ncurses\"" - out))) - #t))))))) + (invoke "make" "install" + "-C" "src/ncurses" + "-j" (number->string + (parallel-job-count))) + (let* ((out (assoc-ref outputs "out")) + (dir "src/ncurses") + (files (find-files dir ".scm"))) + (substitute* files + (("\"libguile-ncurses\"") + (format #f "\"~a/lib/guile/2.2/libguile-ncurses\"" + out))) + #t)))))) (home-page "https://www.gnu.org/software/guile-ncurses/") (synopsis "Guile bindings to ncurses") (description -- cgit v1.2.3