[shell changes from patch from perl5.003_23 to perl5.003_24]

[p5sagit/p5-mst-13.2.git] / t / io / pipe.t

diff --git a/t/io/pipe.t b/t/io/pipe.t
index 95df4dc..d70b2ab 100755 (executable)
--- a/t/io/pipe.t
+++ b/t/io/pipe.t
@@ -2,6 +2,16 @@
 
 # $RCSfile: pipe.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:31 $
 
+BEGIN {
+    chdir 't' if -d 't';
+    @INC = '../lib';
+    require Config; import Config;
+    unless ($Config{'d_fork'}) {
+       print "1..0\n";
+       exit 0;
+    }
+}
+
 $| = 1;
 print "1..8\n";