From 30e9cbb44ed70ef6154267e53ba0fcb77bb94ade Mon Sep 17 00:00:00 2001
From: Andreas Enge <andreas@enge.fr>
Date: Mon, 11 Feb 2013 23:17:07 +0100
Subject: [PATCH] gnu: gnupg: Patch out /bin/sh in generated file.

* gnu/packages/gnupg.scm (gnupg): Modify configure phase.
---
 gnu/packages/gnupg.scm | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/gnu/packages/gnupg.scm b/gnu/packages/gnupg.scm
index baf322721d..c198f90865 100644
--- a/gnu/packages/gnupg.scm
+++ b/gnu/packages/gnupg.scm
@@ -155,6 +155,16 @@ specifications are building blocks of S/MIME and TLS.")
        ("libgpg-error" ,libgpg-error)
        ("zlib" ,guix:zlib)
        ("readline" ,readline)))
+   (arguments
+    `(#:phases
+       (alist-replace
+        'configure
+        (lambda* (#:key #:allow-other-keys #:rest args)
+         (let ((configure (assoc-ref %standard-phases 'configure)))
+           (substitute* "tests/openpgp/Makefile.in"
+             (("/bin/sh") (which "bash")))
+           (apply configure args)))
+       %standard-phases)))
     (home-page "http://gnupg.org/")
     (synopsis
      "GNU Privacy Guard (GnuPG), GNU Project's implementation of the OpenPGP standard")