me
/
guix
Archived
1
0
Fork 0
Code

gnu: orpheus: Fix build on aarch64-linux. 

* gnu/packages/orpheus.scm (orpheus)[arguments]: Explicitly set the
build target when building on aarch64-linux.
master
Efraim Flashner 2018-01-21 12:45:21 +02:00
parent e81e154c40
commit b0b7150b6c
No known key found for this signature in database
GPG Key ID: 41AAE7DCCA3D8351
1 changed files with 11 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
gnu/packages/orpheus.scm
View File

@ -1,6 +1,6 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2014 Eric Bavier <bavier@member.fsf.org>
;;; Copyright © 2014 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2014, 2018 Efraim Flashner <efraim@flashner.co.il>
;;;
;;; This file is part of GNU Guix.
;;;
@ -27,7 +27,8 @@
#:use-module (gnu packages mp3)
#:use-module (gnu packages base)
#:use-module (gnu packages xiph)
#:use-module (gnu packages xml))
#:use-module (gnu packages xml)
#:use-module (ice-9 match))
(define-public orpheus
(package
@ -62,13 +63,14 @@
(setenv "CONFIG_SHELL" (which "bash"))
(setenv "SHELL" (which "bash"))
(setenv "LIBS" "-logg") ;doesn't declare its use of libogg
(zero?
(system* "./configure" (string-append "--prefix=" out)
,@(if (string=? "mips64el-linux"
(%current-system))
'("--host=mips64el-unknown-linux-gnu")
'())
)))))
(invoke "./configure"
(string-append "--prefix=" out)
,@(match (%current-system)
("mips64el-linux"
'("--host=mips64el-unknown-linux-gnu"))
("aarch64-linux"
'("--build=aarch64-unknown-linux-gnu"))
(_ `()))))))
(add-after 'configure 'configure-players
(lambda* (#:key inputs #:allow-other-keys)
;; To avoid propagating the mpg321 and vorbis-tools inputs, we can