--- EV/t/02_once.t 2010/10/21 15:13:42 1.11 +++ EV/t/02_once.t 2010/10/28 04:59:35 1.12 @@ -16,7 +16,7 @@ for my $it ("", 1, 2) { for my $i (3..5) { EV::once undef, 0, ($i - 3) * 0.1 + 0.2, sub { - print $_[0] == EV::TIMEOUT ? "" : "not ", "ok $it$i\n"; + print $_[0] == EV::TIMER ? "" : "not ", "ok $it$i\n"; }; }