aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2013-01-13 15:37:01 +0100
committerLudovic Courtès <ludo@gnu.org>2013-01-13 15:37:01 +0100
commitd5529a9162be82df2a9d8f7fecd5b0c6916c2c9e (patch)
tree3c4b3ae7f6b5f9cd2f0908e652ff522ed1a6e9a5
parentfa39cc0da65677e801438cacb94088a13e2f0254 (diff)
downloadgnu-guix-d5529a9162be82df2a9d8f7fecd5b0c6916c2c9e.tar
gnu-guix-d5529a9162be82df2a9d8f7fecd5b0c6916c2c9e.tar.gz
distro: expect: Provide the right path to `stty'.
* distro/packages/tcl.scm (expect): Add #:phases argument.
-rw-r--r--distro/packages/tcl.scm9
1 files changed, 8 insertions, 1 deletions
diff --git a/distro/packages/tcl.scm b/distro/packages/tcl.scm
index 14d50f1373..d764f6b8ad 100644
--- a/distro/packages/tcl.scm
+++ b/distro/packages/tcl.scm
@@ -88,7 +88,14 @@
(string-append "--exec-prefix="
(assoc-ref %outputs "out")))
- ;; FIXME: There are test failures.
+ #:phases (alist-cons-before
+ 'configure 'set-path-to-stty
+ (lambda _
+ (substitute* "configure"
+ (("STTY_BIN=/bin/stty")
+ (string-append "STTY_BIN=" (which "stty")))))
+ %standard-phases)
+
#:test-target "test"))
(home-page "http://expect.nist.gov/")
(synopsis