--- IO-AIO/t/07_feeder.t 2006/10/23 14:49:51 1.2 +++ IO-AIO/t/07_feeder.t 2006/10/24 03:17:40 1.3 @@ -14,10 +14,11 @@ print "ok 1\n"; -$grp->feed_limit (5); +limit $grp 5; $grp->feed (sub { return if $cn2 >= 10; $cn2++; + aioreq_pri $cn2; (add $grp IO::AIO::aio_sleep 0)->cb (sub { $cn3++; });