Change 27711 by [EMAIL PROTECTED] on 2006/04/04 11:14:27
Fix syntax error in io_pipe test
Affected files ...
... //depot/perl/ext/IO/t/io_pipe.t#5 edit
Differences ...
==== //depot/perl/ext/IO/t/io_pipe.t#5 (xtext) ====
Index: perl/ext/IO/t/io_pipe.t
--- perl/ext/IO/t/io_pipe.t#4~27710~ 2006-04-04 03:34:10.000000000 -0700
+++ perl/ext/IO/t/io_pipe.t 2006-04-04 04:14:27.000000000 -0700
@@ -49,7 +49,7 @@
if ($is_win32) {
print "ok $_ # skipped: $is_win32\n" for 1..4;
} else {
- $pipe = new IO::Pipe->reader($perl, '-e', 'print qq(not ok 1)\n"');
+ $pipe = new IO::Pipe->reader($perl, '-e', 'print qq(not ok 1\n)');
while (<$pipe>) {
s/^not //;
print;
End of Patch.