diff options
author | Jesse Luehrs <doy@tozt.net> | 2012-03-05 17:55:26 -0600 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2012-03-05 17:55:26 -0600 |
commit | b061ca22d27fdf0a0babfb4a07e73d763d2de81d (patch) | |
tree | e8b4bbd3eb74f2b69046762cd809438bae85ad4b /t | |
parent | 7586ab247d10dbd40bc865811b0681d6c2e842d7 (diff) | |
download | term-filter-b061ca22d27fdf0a0babfb4a07e73d763d2de81d.tar.gz term-filter-b061ca22d27fdf0a0babfb4a07e73d763d2de81d.zip |
make sure this test doesn't hang forever if there's a bug
Diffstat (limited to 't')
-rw-r--r-- | t/basic.t | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -17,6 +17,10 @@ SCRIPT my $crlf = "\x0d\x0a"; $pty->spawn($^X, '-Ilib', '-e', $script); + +# just in case +alarm 60; + $pty->write("foo\n"); is($pty->read(undef, 5), "foo$crlf"); is($pty->read(undef, 5), "foo$crlf"); |