]>
Commit | Line | Data |
---|---|---|
2a8be5aa MT |
1 | diff -up guile-1.8.7/test-suite/tests/popen.test.testsuite guile-1.8.7/test-suite/tests/popen.test |
2 | --- guile-1.8.7/test-suite/tests/popen.test.testsuite 2009-07-04 00:19:00.000000000 +0200 | |
3 | +++ guile-1.8.7/test-suite/tests/popen.test 2009-07-16 17:09:57.000000000 +0200 | |
4 | @@ -168,7 +168,7 @@ | |
5 | (port (with-error-to-port (cdr c2p) | |
6 | (lambda () | |
7 | (open-output-pipe | |
8 | - "exec 0</dev/null; while true; do echo closed 1>&2; done"))))) | |
9 | + "exec 0</dev/null; echo closed 1>&2; sleep 3"))))) | |
10 | (close-port (cdr c2p)) ;; write side | |
11 | (with-epipe | |
12 | (lambda () |