made tests more resilient

t/mojo/iowatcher.t

@@ -41,9 +41,9 @@ is $writable, undef, 'handle is not writable';
 # Connect
 my $client =
   IO::Socket::INET->new(PeerAddr => '127.0.0.1', PeerPort => $port);
-$watcher->one_tick(0);
-is $readable, 1,     'handle is readable';
-is $writable, undef, 'handle is not writable';
+$watcher->one_tick(1);
+ok $readable, 'handle is readable';
+ok !$writable, 'handle is not writable';
 
 # Accept
 my $server = $listen->accept;

t/mojo/iowatcher_ev.t

@@ -42,9 +42,9 @@ is $writable, undef, 'handle is not writable';
 # Connect
 my $client =
   IO::Socket::INET->new(PeerAddr => '127.0.0.1', PeerPort => $port);
-$watcher->one_tick(0);
-is $readable, 1,     'handle is readable';
-is $writable, undef, 'handle is not writable';
+$watcher->one_tick(1);
+ok $readable, 'handle is readable';
+ok !$writable, 'handle is not writable';
 
 # Accept
 my $server = $listen->accept;

t/mojo/trigger.t

@@ -31,13 +31,13 @@ is_deeply \@results, [0, 0], 'right results';
 $t = Mojo::IOLoop::Trigger->new;
 my $done;
 $t->on(done => sub { shift; $done = [@_, 'works!'] });
-for my $i (0, '0.5') {
+for my $i (0, 1) {
   $t->begin;
   Mojo::IOLoop->timer($i => sub { $t->end($i) });
 }
 @results = $t->start;
-is_deeply $done, [0, '0.5', 'works!'], 'right results';
-is_deeply \@results, [0, '0.5'], 'right results';
+is_deeply $done, [0, 1, 'works!'], 'right results';
+is_deeply \@results, [0, 1], 'right results';
 
 # Mojo::IOLoop
 $done = undef;