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

gnu: apr: Add libxcrypt dependency.

Browse source 
* gnu/packages/apr.scm (apr): Add libxcrypt dependency.

Change-Id: Ib43ea0e3933e0df27654638150f21b8f8f504512
This commit is contained in:
Josselin Poiret 2024-02-02 19:03:55 +01:00 committed by Ludovic Courtès
parent 45f99a1e6a
commit 5eca35f7eb
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 20 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

30
gnu/packages/apr.scm
View file

@ -26,6 +26,7 @@ (define-module (gnu packages apr)
#:use-module (guix utils)
#:use-module (guix build-system gnu)
#:use-module (gnu packages)
#:use-module (gnu packages crypto)
#:use-module (gnu packages perl)
#:use-module (gnu packages xml)
#:use-module (gnu packages autotools))
@ -51,16 +52,25 @@ (define-public apr
;; Thus, build sequentially.
`(#:parallel-build? #f
#:parallel-tests? #f
,@(if (target-ppc32?)
`(#:phases
(modify-phases %standard-phases
(add-after 'unpack 'patch-sources
(lambda* (#:key inputs native-inputs #:allow-other-keys)
(invoke "patch" "-p1" "--force" "--input"
(assoc-ref (or native-inputs inputs)
"atomics-patch"))))))
'())))
(inputs (list perl libltdl))
#:phases
(modify-phases %standard-phases
,@(if (target-ppc32?)
`((add-after 'unpack 'patch-sources
(lambda* (#:key inputs native-inputs #:allow-other-keys)
(invoke "patch" "-p1" "--force" "--input"
(assoc-ref (or native-inputs inputs)
"atomics-patch")))))
'())
(add-after 'install 'patch-libxcrypt-reference
(lambda* (#:key inputs outputs #:allow-other-keys)
(define out (assoc-ref outputs "out"))
(define libxcrypt
(dirname (search-input-file inputs "/lib/libcrypt.so.1")))
(substitute* (list (string-append out "/bin/apr-1-config")
(string-append out "/lib/pkgconfig/apr-1.pc"))
(("-lcrypt")
(string-append "-L" libxcrypt " -lcrypt"))))))))
(inputs (list perl libltdl libxcrypt))
(native-inputs
`(,@(if (target-ppc32?)
`(("atomics-patch"