mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-01-21 09:37:03 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: aalib: Use INVOKE.

Browse source 
* gnu/packages/video.scm (aalib)[arguments]: Substitute INVOKE for
SYSTEM*.
This commit is contained in:
Tobias Geerinckx-Rice 2018-04-01 07:56:45 +02:00
parent d840f6b98a
commit 3103101ec9
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79
1 changed files with 16 additions and 16 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

32
gnu/packages/video.scm
View file

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