oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fixed tests for newByDynamicClass and added a couple more for it

Browse source
This commit is contained in:
Doug Bell 2008-01-25 17:47:03 +00:00
parent 62892460cf
commit 054534564b
1 changed files with 18 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

25
t/Asset/Asset.t
View file

@ -144,7 +144,7 @@ $canViewMaker->prepare(
}, },
); );
plan tests => 86 plan tests => 88
+ scalar(@fixIdTests) + scalar(@fixIdTests)
+ scalar(@fixTitleTests) + scalar(@fixTitleTests)
+ 2*scalar(@getTitleTests) #same tests used for getTitle and getMenuTitle + 2*scalar(@getTitleTests) #same tests used for getTitle and getMenuTitle
@ -207,12 +207,23 @@ $deadAsset = WebGUI::Asset->newByDynamicClass($session, 'RoysNonExistantAssetId'
is ($deadAsset, undef,'newByDynamicClass constructor with invalid assetId returns undef'); is ($deadAsset, undef,'newByDynamicClass constructor with invalid assetId returns undef');
# -- no assetId # -- no assetId
{ is(
my $confession = ''; WebGUI::Asset->newByDynamicClass( $session ),
local $SIG{__DIE__} = sub { $confession = $_[0]; }; undef,
eval { WebGUI::Asset->newByDynamicClass($session); }; "newByDynamicClass constructor returns 'undef' with no assetId",
like($confession, qr/newByDynamicClass requires assetId/, 'newByDynamicClass constructor with no assetId confesses and dies'); );
}
# -- no session
is(
WebGUI::Asset->newByDynamicClass( ),
undef,
"newByDynamicClass constructor returns 'undef' with no valid WebGUI::Session",
);
is(
WebGUI::Asset->newByDynamicClass( "nothing" ),
undef,
"newByDynamicClass constructor returns 'undef' with no valid WebGUI::Session",
);
# Root Asset # Root Asset
isa_ok($rootAsset, 'WebGUI::Asset'); isa_ok($rootAsset, 'WebGUI::Asset');