diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2013-01-12 23:00:32 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2013-01-12 23:00:32 +0100 |
| commit | 75abd8ab2397f30f9aebba8c014749cc84dcf69e (patch) | |
| tree | c6c6a5455241939ea56eee8136cfd3b17edd18c6 | |
| parent | 39224d94e3f3ccc42aae924e9e0ce651d78e4c4b (diff) | |
| download | guix-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.
| -rw-r--r-- | distro/packages/dejagnu.scm | 7 |
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/") |