r64701 - in /trunk/libweather-google-perl/t: 01init.t 02current_conditions.t 03forecast_conditions.t 04forecast_information.t 05language.t

[periapt-guest at users.alioth.debian.org]

Author: periapt-guest
Date: Sun Nov  7 16:07:29 2010
New Revision: 64701

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=64701
Log:
releasing

Modified:
    trunk/libweather-google-perl/t/01init.t
    trunk/libweather-google-perl/t/02current_conditions.t
    trunk/libweather-google-perl/t/03forecast_conditions.t
    trunk/libweather-google-perl/t/04forecast_information.t
    trunk/libweather-google-perl/t/05language.t

Modified: trunk/libweather-google-perl/t/01init.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libweather-google-perl/t/01init.t?rev=64701&op=diff
==============================================================================
--- trunk/libweather-google-perl/t/01init.t (original)
+++ trunk/libweather-google-perl/t/01init.t Sun Nov  7 16:07:29 2010
@@ -2,14 +2,8 @@
 
 use strict;
 use warnings;
-use Test::More;
-if ($ENV{TEST_WITH_NETWORK}) {
-    plan tests => 10;
-}
-else {
-    plan skip_all => "ignoring tests that depend on network";
-    exit(0);
-}
+
+use Test::Simple tests => 10;
 
 use Weather::Google;
 
@@ -28,4 +22,3 @@
 ok ( $g = new Weather::Google('Beverly Hills, CA'), 'new(city)');
 ok( defined $g );
 ok( $g->isa('Weather::Google') );
-

Modified: trunk/libweather-google-perl/t/02current_conditions.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libweather-google-perl/t/02current_conditions.t?rev=64701&op=diff
==============================================================================
--- trunk/libweather-google-perl/t/02current_conditions.t (original)
+++ trunk/libweather-google-perl/t/02current_conditions.t Sun Nov  7 16:07:29 2010
@@ -1,16 +1,10 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl -Tw
 
 use strict;
 use warnings;
 
-use Test::More;
-if ($ENV{TEST_WITH_NETWORK}) {
-    plan tests => 41;
-}
-else {
-    plan skip_all => "ignoring tests that depend on network";
-    exit(0);
-}
+use Test::More tests => 41;
+
 use Weather::Google;
 
 my $g = new Weather::Google(90210);
@@ -43,3 +37,4 @@
 ok( @b = $g->current(@test) );
 is( @a, @b, "Arrays work" );
 
+

Modified: trunk/libweather-google-perl/t/03forecast_conditions.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libweather-google-perl/t/03forecast_conditions.t?rev=64701&op=diff
==============================================================================
--- trunk/libweather-google-perl/t/03forecast_conditions.t (original)
+++ trunk/libweather-google-perl/t/03forecast_conditions.t Sun Nov  7 16:07:29 2010
@@ -6,10 +6,6 @@
 use Weather::Google;
 
 use Test::More;
-if (not $ENV{TEST_WITH_NETWORK}) {
-    plan skip_all => "ignoring tests that depend on network";
-    exit(0);
-}
 
 # There are 5+3(n)+(3*11)(n) tests. 
 
@@ -77,3 +73,4 @@
 	ok( @b = $g->forecast($m, at test) );
 	is( @a, @b, "Arrays work" );
 }
+

Modified: trunk/libweather-google-perl/t/04forecast_information.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libweather-google-perl/t/04forecast_information.t?rev=64701&op=diff
==============================================================================
--- trunk/libweather-google-perl/t/04forecast_information.t (original)
+++ trunk/libweather-google-perl/t/04forecast_information.t Sun Nov  7 16:07:29 2010
@@ -3,15 +3,8 @@
 use strict;
 use warnings;
 
-use Test::More;
+use Test::More tests => 26;
 
-if ($ENV{TEST_WITH_NETWORK}) {
-    plan tests => 26;
-}
-else {
-    plan skip_all => "ignoring tests that depend on network";
-    exit(0);
-}
 use Weather::Google;
 
 my $g = new Weather::Google(90210);
@@ -42,3 +35,4 @@
 ok( @b = $g->info(@test) );
 is( @a, @b, "Arrays work" );
 
+

Modified: trunk/libweather-google-perl/t/05language.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libweather-google-perl/t/05language.t?rev=64701&op=diff
==============================================================================
--- trunk/libweather-google-perl/t/05language.t (original)
+++ trunk/libweather-google-perl/t/05language.t Sun Nov  7 16:07:29 2010
@@ -3,14 +3,7 @@
 use strict;
 use warnings;
 
-use Test::More;
-if ($ENV{TEST_WITH_NETWORK}) {
-    plan tests => 12;
-}
-else {
-    plan skip_all => "ignoring tests that depend on network";
-    exit(0);
-}
+use Test::More tests => 12;
 use Test::Warn;
 
 use Weather::Google;