X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=t%2F50-network.t;fp=t%2F50-network.t;h=ef9b682f19aedaa0850f0fb47399d2d698939029;hb=045faed66663b14c8bc70e70c2653c8558af2766;hp=20b07e63ad55a7541b799bb035273a416efe1428;hpb=182562fe5e01b0e24a6efdf3700a5d17c4585b7b;p=www-offliberty.git diff --git a/t/50-network.t b/t/50-network.t index 20b07e6..ef9b682 100644 --- a/t/50-network.t +++ b/t/50-network.t @@ -2,19 +2,13 @@ use strict; use warnings; -use Test::More; +use LWP::Online ':skip_all'; +use Test::More tests => 2; use WWW::Offliberty qw/off/; -if ($ENV{NETWORK_TEST}) { - plan tests => 2; +my @results; +@results = off "http://youtube.com/watch?v=Tj75Arhq5ho"; +is @results, 1, 'youtube'; - my @results; - - @results = off "http://youtube.com/watch?v=Tj75Arhq5ho"; - is @results, 1, 'youtube'; - - @results = off "http://youtube.com/watch?v=Tj75Arhq5ho", video_file => 1; - is @results, 2, 'youtube, video_file => 1'; -} else { - plan skip_all => '$ENV{NETWORK_TEST} not true'; -} +@results = off "http://youtube.com/watch?v=Tj75Arhq5ho", video_file => 1; +is @results, 2, 'youtube, video_file => 1';