summary refs log tree commit diff
path: root/distro
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2013-01-12 23:00:32 +0100
committerLudovic Courtès <ludo@gnu.org>2013-01-12 23:00:32 +0100
commit75abd8ab2397f30f9aebba8c014749cc84dcf69e (patch)
treec6c6a5455241939ea56eee8136cfd3b17edd18c6 /distro
parent39224d94e3f3ccc42aae924e9e0ce651d78e4c4b (diff)
downloadguix-75abd8ab2397f30f9aebba8c014749cc84dcf69e.tar.gz
distro: dejagnu: Add `expect' in the search path of `runtest'.
* distro/packages/dejagnu.scm (dejagnu): In `check' phase, change `PATH'
  in `runtest', to avoid "expect not found in PATH" error.
Diffstat (limited to 'distro')
-rw-r--r--distro/packages/dejagnu.scm7
1 files changed, 4 insertions, 3 deletions
diff --git a/distro/packages/dejagnu.scm b/distro/packages/dejagnu.scm
index bb735bfe37..f350f8a973 100644
--- a/distro/packages/dejagnu.scm
+++ b/distro/packages/dejagnu.scm
@@ -68,9 +68,10 @@
                     (let ((out    (assoc-ref outputs "out"))
                           (expect (assoc-ref inputs "expect")))
                       (substitute* (string-append out "/bin/runtest")
-                        (("expectbin=expect")
-                         (string-append "expectbin="
-                                        expect "/bin/expect")))))
+                        (("^mypath.*$" all)
+                         (string-append all
+                                        "export PATH="
+                                        expect "/bin:$PATH\n")))))
                   %standard-phases))))
     (home-page
      "http://www.gnu.org/software/dejagnu/")