--- AnyEvent/t/01_basic.t	2008/04/23 11:25:42	1.3
+++ AnyEvent/t/01_basic.t	2009/07/18 00:05:29	1.5
@@ -1,9 +1,8 @@
-$|=1;
-BEGIN { print "1..6\n" }
-
 use AnyEvent;
 use AnyEvent::Impl::Perl;
 
+$| = 1; print "1..6\n";
+
 print "ok 1\n";
 
 my $cv = AnyEvent->condvar;
@@ -14,7 +13,7 @@
 
 print "ok 3\n";
 
-AnyEvent->timer (after => 1, cb => sub { print "not ok 5\n" });
+AnyEvent->timer (after => 0.01, cb => sub { print "not ok 5\n" });
 
 print "ok 4\n";