ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-28 07:12:30 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: openssl: Fix the call of 'apply invoke'.

Browse source 
This fixes the build failure introduced in commit 05f6e6014.

* gnu/packages/tls.scm (openssl, openssl-next)[arguments]: Pass configure
flags to 'apply invoke' as the ARGLIST list.
This commit is contained in:
宋文武 2018-03-18 02:41:10 +08:00
parent 8ea5d8685c
commit 5011d3f4a0
No known key found for this signature in database
GPG key ID: 26525665AE727D37
1 changed files with 33 additions and 31 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
gnu/packages/tls.scm
View file

@ -298,6 +298,7 @@ (define-public openssl
(lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out")))
(apply invoke "./config"
(list
"shared" ;build shared libraries
"--libdir=lib"
@ -315,7 +316,7 @@ (define-public openssl
,@(if (and (not (%current-target-system))
(string-prefix? "armhf" (%current-system)))
'("-mfpu=vfpv3")
'())))))
'()))))))
(add-after
'install 'make-libraries-writable
(lambda* (#:key outputs #:allow-other-keys)
@ -422,6 +423,7 @@ (define-public openssl-next
(let* ((out (assoc-ref outputs "out"))
(lib (string-append out "/lib")))
(apply invoke "./config"
(list
"shared" ;build shared libraries
"--libdir=lib"
@ -440,7 +442,7 @@ (define-public openssl-next
,@(if (and (not (%current-target-system))
(string-prefix? "armhf" (%current-system)))
'("-mfpu=vfpv3")
'())))))
'()))))))
;; XXX: Duplicate this phase to make sure 'version' evaluates
;; in the current scope and not the inherited one.