diff options
author | Jesse Luehrs <doy@tozt.net> | 2016-05-28 23:25:08 -0400 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2016-05-28 23:25:08 -0400 |
commit | eb9cb177d7b62bd611a43451f5bd613f52aa0327 (patch) | |
tree | 5ccbe4c4a7322bd530799535e6d7d1a0dffe0fee | |
parent | 6ceb27db00a776f87401de9648fdfa92f2799622 (diff) | |
download | io-pty-easy-eb9cb177d7b62bd611a43451f5bd613f52aa0327.tar.gz io-pty-easy-eb9cb177d7b62bd611a43451f5bd613f52aa0327.zip |
skip flaky test for now
-rw-r--r-- | t/read-write.t | 3 |
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; |