--- AnyEvent/t/68_poe_04_condvar.t	2009/04/23 22:44:30	1.2
+++ AnyEvent/t/68_poe_04_condvar.t	2009/07/09 22:49:18	1.3
@@ -1,11 +1,10 @@
 $|=1;
-$^W=0;
 BEGIN {
    print "1..21\n"
 }
 
 use AnyEvent;
-use AnyEvent::Impl::POE;
+use AnyEvent::Impl::POE; $^W = 0;
 
 print "ok 1\n";
 
@@ -67,7 +66,7 @@
    my $cv = AnyEvent->condvar;
 
    print "ok 19\n";
-   my $t = AnyEvent->timer (after => 0, cb => sub { &$cv });
+   my $t = AnyEvent->timer (after => 0, cb => $cv);
 
    print "ok 20\n";
    $cv->recv;