summaryrefslogtreecommitdiffstats
path: root/t/02-read-write.t
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2011-04-14 02:07:30 -0500
committerJesse Luehrs <doy@tozt.net>2011-04-14 02:07:30 -0500
commit85db4e0a81e4f81a6fd86f456215be91ba8c4964 (patch)
tree85f61356ec762375236e339f41ec244f05562a0f /t/02-read-write.t
parent0932796624f744c75cec17e2c30ea942f6b67253 (diff)
downloadapp-termcast-85db4e0a81e4f81a6fd86f456215be91ba8c4964.tar.gz
app-termcast-85db4e0a81e4f81a6fd86f456215be91ba8c4964.zip
use Test::Requires and done_testing
Diffstat (limited to 't/02-read-write.t')
-rw-r--r--t/02-read-write.t11
1 files changed, 5 insertions, 6 deletions
diff --git a/t/02-read-write.t b/t/02-read-write.t
index 5fd6baa..a970ddd 100644
--- a/t/02-read-write.t
+++ b/t/02-read-write.t
@@ -2,13 +2,10 @@
use strict;
use warnings;
use Test::More;
-use App::Termcast;
+use Test::Requires 'Test::TCP';
use IO::Pty::Easy;
-BEGIN {
- eval "use Test::TCP;";
- plan skip_all => "Test::TCP is required for this test" if $@;
- plan tests => 5;
-}
+
+use App::Termcast;
test_tcp(
client => sub {
@@ -58,3 +55,5 @@ EOF
'sent the right data to the server');
},
);
+
+done_testing;