This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
more sleep needed from slow systems (from Peter Haworth)
authorGurusamy Sarathy <gsar@cpan.org>
Mon, 20 Mar 2000 21:06:01 +0000 (21:06 +0000)
committerGurusamy Sarathy <gsar@cpan.org>
Mon, 20 Mar 2000 21:06:01 +0000 (21:06 +0000)
p4raw-id: //depot/perl@5841

t/io/pipe.t

index 997c6bf..4559624 100755 (executable)
@@ -98,7 +98,7 @@ if ($Config{d_sfio} || $^O eq 'machten' || $^O eq 'beos' || $^O eq 'posix-bc') {
 else {
     local $SIG{PIPE} = 'IGNORE';
     open NIL, '|true'  or die "open failed: $!";
-    sleep 4;
+    sleep 5;
     print NIL 'foo'    or die "print failed: $!";
     if (close NIL) {
        print "not ok 9\n";