diff options
author | Jesse Luehrs <doy@tozt.net> | 2011-04-14 02:07:30 -0500 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2011-04-14 02:07:30 -0500 |
commit | 85db4e0a81e4f81a6fd86f456215be91ba8c4964 (patch) | |
tree | 85f61356ec762375236e339f41ec244f05562a0f /t/03-write-to-termcast.t | |
parent | 0932796624f744c75cec17e2c30ea942f6b67253 (diff) | |
download | app-termcast-85db4e0a81e4f81a6fd86f456215be91ba8c4964.tar.gz app-termcast-85db4e0a81e4f81a6fd86f456215be91ba8c4964.zip |
use Test::Requires and done_testing
Diffstat (limited to 't/03-write-to-termcast.t')
-rw-r--r-- | t/03-write-to-termcast.t | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/t/03-write-to-termcast.t b/t/03-write-to-termcast.t index 1e505f2..6e65e82 100644 --- a/t/03-write-to-termcast.t +++ b/t/03-write-to-termcast.t @@ -2,12 +2,9 @@ use strict; use warnings; use Test::More; +use Test::Requires 'Test::TCP'; + use App::Termcast; -BEGIN { - eval "use Test::TCP;"; - plan skip_all => "Test::TCP is required for this test" if $@; - plan tests => 3; -} test_tcp( client => sub { @@ -38,3 +35,5 @@ test_tcp( is($buf, 'foo', 'wrote correctly'); }, ); + +done_testing; |