gnu: gnupg: Update to 2.1.16.

* gnu/packages/gnupg.scm (gnupg): Update to 2.1.16.
[arguments]: Remove obsolete substitution from 'patch-paths' phase.
Remove 'set-home' phase. Add 'set-gnupg-home' phase.
This commit is contained in:
Leo Famulari 2016-11-19 13:28:16 -05:00
parent 9fff9e6484
commit 764c566221
No known key found for this signature in database
GPG key ID: 2646FA30BACA7F08

View file

@ -213,14 +213,14 @@ (define-public npth
(define-public gnupg
(package
(name "gnupg")
(version "2.1.15")
(version "2.1.16")
(source (origin
(method url-fetch)
(uri (string-append "mirror://gnupg/gnupg/gnupg-" version
".tar.bz2"))
(sha256
(base32
"1pgz02gd84ab94w4xdg67p9z8kvkyr9d523bvcxxd2hviwh1m362"))))
"0i483m9q032a0s50f1izb213g4h5i7pcgn395m6hvl3sg2kadfa9"))))
(build-system gnu-build-system)
(native-inputs
`(("pkg-config" ,pkg-config)))
@ -245,8 +245,6 @@ (define-public gnupg
(modify-phases %standard-phases
(add-before 'configure 'patch-paths
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "tests/openpgp/defs.inc"
(("/bin/pwd") (which "pwd")))
(substitute* "scd/scdaemon.c"
(("\"(libpcsclite\\.so[^\"]*)\"" _ name)
(string-append "\"" (assoc-ref inputs "pcsc-lite")
@ -256,13 +254,12 @@ (define-public gnupg
(lambda _
(substitute* (find-files "tests" ".\\.scm$")
(("/usr/bin/env gpgscm")
(string-append (getcwd) "/tests/gpgscm/gpgscm")))))
(add-before 'check 'set-home
;; Some tests require write access to $HOME, otherwise leading to
;; 'failed to create directory /homeless-shelter/.asy' error.
;; TODO Try removing this phase for GnuPG 2.1.16.
(string-append (getcwd) "/tests/gpgscm/gpgscm")))
#t))
;; If this variable is undefined, /bin/pwd is invoked.
(add-before 'check 'set-gnupg-home
(lambda _
(setenv "HOME" "/tmp")
(setenv "GNUPGHOME" (getcwd))
#t)))))
(home-page "https://gnupg.org/")
(synopsis "GNU Privacy Guard")