--- AnyEvent/t/66_ioasync_03_child.t 2012/03/30 04:22:22 1.15 +++ AnyEvent/t/66_ioasync_03_child.t 2012/03/30 04:25:11 1.16 @@ -50,7 +50,7 @@ # because it checks for child exit before installing the signal handler. # seen in version 1.352 - earlier versions had the same bug, but # polled for child exits regularly, so only caused a delay. - sleep 1 if $AnyEvent::MODEL eq "POE"; + sleep 1 if $AnyEvent::MODEL eq "AnyEvent::Impl::POE"; POSIX::_exit 3; } @@ -62,7 +62,10 @@ $cv->recv; - my $pid2 = fork || POSIX::_exit 7; + my $pid2 = fork || do { + sleep 1 if $AnyEvent::MODEL eq "AnyEvent::Impl::POE"; + POSIX::_exit 7; + }; my $cv2 = AnyEvent->condvar;