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

Coverage tests for assetExists.

Browse source
This commit is contained in:
Colin Kuskie 2008-01-01 21:35:19 +00:00
parent 33c4cd833b
commit fb54ca2a1c
1 changed files with 22 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

23
t/Asset/Asset.t
View file

@ -143,7 +143,7 @@ $canViewMaker->prepare(
},
);
plan tests => 71
plan tests => 75
+ scalar(@fixIdTests)
+ scalar(@fixTitleTests)
+ 2*scalar(@getTitleTests) #same tests used for getTitle and getMenuTitle
@ -586,6 +586,27 @@ else {
$session->config->delete('assetUiLevel');
}
################################################################
#
# assetExists
#
################################################################
{
my $id = $canViewAsset->getId;
my $class = 'WebGUI::Asset';
my $date = $canViewAsset->get('revisionDate');
ok ( WebGUI::Asset->assetExists($session, $id, $class, $date), 'assetExists with proper class, id and revisionDate');
ok (!WebGUI::Asset->assetExists($session, $id, 'WebGUI::Asset::Snippet', $date), 'assetExists with wrong class does not exist');
my $id2 = $id;
++$id2;
ok (!WebGUI::Asset->assetExists($session, $id2, $class, $date), 'assetExists with wrong id does not exist');
ok (!WebGUI::Asset->assetExists($session, $id, $class, $date+1), 'assetExists with wrong revisionDate does not exist');
}
END: {
$session->config->set('extrasURL', $origExtras);
$session->config->set('uploadsURL', $origUploads);