Change 23905 by [EMAIL PROTECTED] on 2005/01/31 10:03:56
Fix test suite hang on Win32 caused by change #23898
("perl -e sleep 3" does an indefinite sleep!)
Affected files ...
... //depot/perl/t/op/alarm.t#8 edit
Differences ...
==== //depot/perl/t/op/alarm.t#8 (text) ====
Index: perl/t/op/alarm.t
--- perl/t/op/alarm.t#7~23898~ Sat Jan 29 08:14:20 2005
+++ perl/t/op/alarm.t Mon Jan 31 02:03:56 2005
@@ -53,7 +53,7 @@
{
local $SIG{"ALRM"} = sub { die };
- eval { alarm(1); my $x = qx($Perl -e sleep 3) };
+ eval { alarm(1); my $x = qx($Perl -e "sleep 3") };
chomp (my $foo = "foo\n");
ok($foo eq "foo", '[perl #33928] chomp() fails after alarm(), `sleep`');
}
End of Patch.
