Calculate class to load. Remove class method from each test file. Fix typos.

This commit is contained in:
Colin Kuskie 2010-03-13 19:17:13 -08:00
parent f7589e6237
commit 20507ee883
47 changed files with 138 additions and 280 deletions

View file

@ -8,5 +8,7 @@
# http://www.plainblack.com info@plainblack.com
#-------------------------------------------------------------------
use lib 'tests';
use Test::Class::Load qw{tests/Test};
Test::Class->runtests;

View file

@ -28,18 +28,10 @@ sub list_of_tables {
return [qw/assetData/];
}
sub _00_init : Test(startup) {
my $test = shift;
my $session = WebGUI::Test->session;
$test->{_session} = $session;
note "Loading ". $test->class;
eval { WebGUI::Asset->loadModule($test->class); };
}
sub _constructor : Test(4) {
my $test = shift;
my $session = $test->session;
my $asset = $test->class->new({session => $session});
my $asset = $test->class->new({session => $session});
isa_ok $asset, $test->class;
isa_ok $asset->session, 'WebGUI::Session';
@ -319,4 +311,3 @@ __END__
is $properties->{parentId}, 'I have a parent', '... works on parentId';
}

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::File/;
}
sub list_of_tables {
return [qw/assetData FileAsset/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::File::GalleryFile/;
}
sub list_of_tables {
return [qw/assetData FileAsset GalleryFile/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::File::Image/;
}
sub list_of_tables {
return [qw/assetData FileAsset ImageAsset/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::File::ZipArchive/;
}
sub list_of_tables {
return [qw/assetData FileAsset ZipArchiveAsset/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Redirect/;
}
sub assetUiLevel {
return 9;

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::RichEdit/;
}
sub assetUiLevel {
return 5;

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Shortcut/;
}
sub list_of_tables {
return [qw/assetData Shortcut/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Sku/;
}
sub list_of_tables {
return [qw/assetData sku/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Snippet/;
}
sub assetUiLevel {
return 5;

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Template/;
}
sub list_of_tables {
return [qw/assetData template/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject/;
}
sub list_of_tables {
return [qw/assetData wobject/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::Article/;
}
sub list_of_tables {
return [qw/assetData wobject Article/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::Calendar/;
}
sub list_of_tables {
return [qw/assetData wobject Calendar/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::Carousel/;
}
sub list_of_tables {
return [qw/assetData wobject Carousel/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::Collaboration/;
}
sub list_of_tables {
return [qw/assetData wobject Collaboration assetAspectRssFeed/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::HttpProxy/;
}
sub assetUiLevel {
return 5;

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::DataForm/;
}
sub assetUiLevel {
return 5;

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::DataTable/;
}
sub list_of_tables {
return [qw/assetData wobject DataTable/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::EventManagementSystem/;
}
sub list_of_tables {
return [qw/assetData wobject EventManagementSystem/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::Folder/;
}
sub assetUiLevel {
return 5;

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::Gallery/;
}
sub list_of_tables {
return [qw/assetData wobject Gallery assetAspectRssFeed/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::GalleryAlbum/;
}
sub list_of_tables {
return [qw/assetData wobject GalleryAlbum assetAspectRssFeed/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::HttpProxy/;
}
sub assetUiLevel {
return 5;

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::InOutBoard/;
}
sub list_of_tables {
return [qw/assetData wobject InOutBoard/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::Layout/;
}
sub list_of_tables {
return [qw/assetData wobject Layout/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::Map/;
}
sub list_of_tables {
return [qw/assetData wobject Map/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::Matrix/;
}
sub list_of_tables {
return [qw/assetData wobject Matrix/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::MessageBoard/;
}
sub list_of_tables {
return [qw/assetData wobject MessageBoard/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::MultiSearch/;
}
sub list_of_tables {
return [qw/assetData wobject MultiSearch/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::Navigation/;
}
sub list_of_tables {
return [qw/assetData wobject Navigation/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::Poll/;
}
sub list_of_tables {
return [qw/assetData wobject Poll/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::ProjectManager/;
}
sub list_of_tables {
return [qw/assetData wobject PM_wobject/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::SQLReport/;
}
sub assetUiLevel {
return 5;

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::Search/;
}
sub list_of_tables {
return [qw/assetData wobject search/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::Shelf/;
}
sub list_of_tables {
return [qw/assetData wobject Shelf/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::StockData/;
}
sub list_of_tables {
return [qw/assetData wobject StockData/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::StoryArchive/;
}
sub list_of_tables {
return [qw/assetData wobject StoryArchive assetAspectRssFeed/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::StoryTopic/;
}
sub list_of_tables {
return [qw/assetData wobject StoryTopic assetAspectRssFeed/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::Survey/;
}
sub list_of_tables {
return [qw/assetData wobject Survey/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::SyndicatedContent/;
}
sub assetUiLevel {
return 6;

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::Thingy/;
}
sub list_of_tables {
return [qw/assetData wobject Thingy/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::TimeTracking/;
}
sub list_of_tables {
return [qw/assetData wobject TT_wobject/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::UserList/;
}
sub list_of_tables {
return [qw/assetData wobject UserList/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::WeatherData/;
}
sub list_of_tables {
return [qw/assetData wobject WeatherData/];

View file

@ -14,13 +14,10 @@ use lib "$FindBin::Bin/lib";
use base qw/Test::WebGUI::Asset/;
use Test::WebGUI::More;
use Test::WebGUI::Deep;
use Test::WebGUI::Exception;
use Test::More;
use Test::Deep;
use Test::Exception;
sub class {
return qw/WebGUI::Asset::Wobject::WikiMaster/;
}
sub list_of_tables {
return [qw/assetData wobject WikiMaster assetAspectRssFeed assetAspectComments assetAspect_Subscribable/];