1 files changed, 3 insertions, 0 deletions
diff --git a/t/read-write.t b/t/read-write.t
index 21fe729..42b7b58 100644
--- a/t/read-write.t
+++ b/t/read-write.t
@@ -12,6 +12,8 @@ like($pty->read, qr/testing/, "basic read/write testing");
 is($pty->read(0.1), undef, "read returns undef on timeout");
 $pty->kill;
 
+TODO: {
+local $TODO = "this isn't a reliable way to produce a blocking write";
 $pty->spawn("$^X -e 'sleep(1) while 1'");
 eval {
     local $SIG{ALRM} = sub {
@@ -25,6 +27,7 @@ eval {
 };
 $pty->kill;
 $pty->close;
+}
 
 # create an entirely new pty to clear the input buffer
 $pty = IO::Pty::Easy->new;