TakeV/guix
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

gnu: guile-ncurses: Unconditionally return #T from build phases.

Browse source 
* gnu/packages/guile.scm (guile-ncurses)[arguments]: Use INVOKE.
This commit is contained in:
Ricardo Wurmus 2019-01-26 22:22:30 +01:00
parent d59a8ac629
commit e5855e6f6b
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 12 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

24
gnu/packages/guile.scm
View file

@ -674,18 +674,18 @@ (define-public guile-ncurses
(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