aboutsummaryrefslogtreecommitdiff
path: root/distro/packages/guile.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2012-12-20 23:07:46 +0100
committerLudovic Courtès <ludo@gnu.org>2012-12-20 23:07:46 +0100
commit8ffaa93bffdb08dfe175854863462211d61261be (patch)
tree5674eeea3e4ad18d4a15b447f6d0f4696a250bf6 /distro/packages/guile.scm
parenteca63d3df8642587c35765af8446c1669e192789 (diff)
downloadguix-8ffaa93bffdb08dfe175854863462211d61261be.tar
guix-8ffaa93bffdb08dfe175854863462211d61261be.tar.gz
distro: guile: Patch (ice-9 popen) to use the right shell.
* distro/packages/guile.scm (guile-2.0): Add `pre-configure'. * distro/packages/base.scm (guile-final): Adjust to preserve the `pre-configure' phase.
Diffstat (limited to 'distro/packages/guile.scm')
-rw-r--r--distro/packages/guile.scm10
1 files changed, 10 insertions, 0 deletions
diff --git a/distro/packages/guile.scm b/distro/packages/guile.scm
index a5d37eb40b..68c2fcc2ef 100644
--- a/distro/packages/guile.scm
+++ b/distro/packages/guile.scm
@@ -120,6 +120,16 @@ extensible. It supports many SRFIs.")
(self-native-input? #t)
+ (arguments
+ '(#:phases (alist-cons-before
+ 'configure 'pre-configure
+ (lambda* (#:key inputs #:allow-other-keys)
+ (let ((bash (assoc-ref inputs "bash")))
+ (substitute* "module/ice-9/popen.scm"
+ (("/bin/sh")
+ (string-append bash "/bin/bash")))))
+ %standard-phases)))
+
(synopsis "GNU Guile 2.0, an embeddable Scheme implementation")
(description
"GNU Guile is an implementation of the Scheme programming language, with