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