From: <ik...@us...> - 2009-09-09 00:38:29
|
Revision: 57 http://webfetch.svn.sourceforge.net/webfetch/?rev=57&view=rev Author: ikluft Date: 2009-09-09 00:38:23 +0000 (Wed, 09 Sep 2009) Log Message: ----------- update tests Modified Paths: -------------- branches/v0.13/t/00-load.t branches/v0.13/t/pod-coverage.t Modified: branches/v0.13/t/00-load.t =================================================================== --- branches/v0.13/t/00-load.t 2009-09-09 00:37:27 UTC (rev 56) +++ branches/v0.13/t/00-load.t 2009-09-09 00:38:23 UTC (rev 57) @@ -1,9 +1,11 @@ #!perl -T -use Test::More tests => 8; +use Test::More tests => 10; BEGIN { use_ok( 'WebFetch' ); + use_ok( 'WebFetch::Data::Store' ); + use_ok( 'WebFetch::Data::Record' ); use_ok( 'WebFetch::Input::Atom' ); use_ok( 'WebFetch::Input::PerlStruct' ); use_ok( 'WebFetch::Input::RSS' ); Modified: branches/v0.13/t/pod-coverage.t =================================================================== --- branches/v0.13/t/pod-coverage.t 2009-09-09 00:37:27 UTC (rev 56) +++ branches/v0.13/t/pod-coverage.t 2009-09-09 00:38:23 UTC (rev 57) @@ -20,7 +20,9 @@ # test Pod coverage on everything else my %test_plan = ( "WebFetch" => [ qw( new debug fetch_main2 module_select - singular_handler init_fname2fnum init_wk2fnum ) ], + singular_handler fname2fnum wk2fname wk2fnum ) ], + "WebFetch::Data::Store" => [ qw( new init ) ], + "WebFetch::Data::Record" => [ qw( new init data ) ], "WebFetch::Output::TT" => [ qw( new fetch ) ], "WebFetch::Output::Dump" => [ qw( new fetch ) ], "WebFetch::Output::TWiki" => [ qw( new fetch ) ], This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |