--- IO-AIO/t/03_errors.t	2006/10/25 08:17:22	1.4
+++ IO-AIO/t/03_errors.t	2010/01/07 18:25:51	1.6
@@ -7,7 +7,7 @@
 use lib "$FindBin::Bin";
 use aio_test_common;
 
-BEGIN { plan tests => 13 }
+BEGIN { plan tests => 12 }
 
 IO::AIO::min_parallel 2;
 
@@ -43,18 +43,20 @@
 
 # write to file open for reading
 ok(open(F, $some_file)) or die $!;
-aio_write *F, 0, 10, "foobarbaz.", 0, sub {
-    my $written = shift;
-    ok($written < 0);
-    ok($! == EBADF);
-};
+eval { aio_write *F, 0, 10, "foobarbaz.", 0, sub { ok (0) } };
+ok ($@ =~ /mode mismatch/);
 pcb;
 
 close F;
 
 aio_symlink "\\test\\", $some_link, sub {
-   ok (!$_[0]);
-   ok ("\\test\\" eq readlink $some_link);
+   if ($^O eq "cygwin") {
+      ok (1);
+      ok (1);
+   } else {
+      ok (!$_[0]);
+      ok ("\\test\\" eq readlink $some_link);
+   }
 };
 pcb;
 unlink $some_link;