[shell changes from patch from perl5.003_12 to perl5.003_13]

[p5sagit/p5-mst-13.2.git] / t / lib / io_pipe.t

diff --git a/t/lib/io_pipe.t b/t/lib/io_pipe.t
old mode 100644 (file)
new mode 100755 (executable)
index 225d04b..6f9d30c
--- a/t/lib/io_pipe.t
+++ b/t/lib/io_pipe.t
@@ -35,7 +35,7 @@ elsif(defined $pid)
  }
 else
  {
-  die;
+  die "# error = $!";
  }
 
 $pipe = new IO::Pipe;