gnu: aalib: Use invoke.

* gnu/packages/video.scm (aalib)[arguments]: Use invoke in the custom
configure phase.
This commit is contained in:
Mark H Weaver 2018-03-27 00:55:28 -04:00
parent 5f55ca2105
commit 3595e83dc5
No known key found for this signature in database
GPG Key ID: 7CEF29847562C516
1 changed files with 16 additions and 16 deletions

View File

@ -153,22 +153,22 @@
(let ((out (assoc-ref outputs "out")) (let ((out (assoc-ref outputs "out"))
(ncurses (assoc-ref inputs "ncurses"))) (ncurses (assoc-ref inputs "ncurses")))
(setenv "CONFIG_SHELL" (which "bash")) (setenv "CONFIG_SHELL" (which "bash"))
(zero? (system* "./configure" (invoke "./configure"
(string-append "--prefix=" out) (string-append "--prefix=" out)
(string-append "--build=" build) (string-append "--build=" build)
;; The ancient config.guess is unable to ;; The ancient config.guess is unable to
;; guess the host triplet on mips64el. ;; guess the host triplet on mips64el.
,@(if (string=? "mips64el-linux" ,@(if (string=? "mips64el-linux"
(%current-system)) (%current-system))
'("--host=mips64el-unknown-linux-gnu") '("--host=mips64el-unknown-linux-gnu")
'()) '())
;; The same is also true with aarch64. ;; The same is also true with aarch64.
,@(if (string=? "aarch64-linux" ,@(if (string=? "aarch64-linux"
(%current-system)) (%current-system))
'("--host=aarch64-unknown-linux-gnu") '("--host=aarch64-unknown-linux-gnu")
'()) '())
(string-append "--with-ncurses=" (string-append "--with-ncurses="
ncurses))))))))) ncurses))))))))
(home-page "http://aa-project.sourceforge.net/aalib/") (home-page "http://aa-project.sourceforge.net/aalib/")
(synopsis "ASCII-art library") (synopsis "ASCII-art library")
(description (description