(address . guix-patches@gnu.org)
20200319091937.11811-1-brice@waegenei.re
* gnu/packages/gnupg.scm (gpa)[arguments]: Add phase wrap-program.
---
gnu/packages/gnupg.scm | 10 ++++++++++
1 file changed, 10 insertions(+)
Toggle diff (25 lines)
diff --git a/gnu/packages/gnupg.scm b/gnu/packages/gnupg.scm
index c5c3d5263f..30658c7cb7 100644
--- a/gnu/packages/gnupg.scm
+++ b/gnu/packages/gnupg.scm
@@ -975,6 +975,16 @@ however, pgpdump produces more detailed and easier to understand output.")
(base32
"1cbpc45f8qbdkd62p12s3q2rdq6fa5xdzwmcwd3xrj55bzkspnwm"))))
(build-system gnu-build-system)
+ (arguments
+ `(#:phases
+ (modify-phases %standard-phases
+ (add-after 'install 'wrap-program
+ (lambda* (#:key inputs outputs #:allow-other-keys)
+ (let ((out (assoc-ref outputs "out"))
+ (gnupg (assoc-ref inputs "gnupg")))
+ (wrap-program (string-append out "/bin/gpa")
+ `("PATH" ":" prefix (,(string-append gnupg "/bin")))
+ )))))))
(native-inputs
`(("pkg-config" ,pkg-config)))
(inputs
base-commit: 771c5e155d7862ed91a5d503eecc00c1db1150ad
--
2.25.1