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

Add more AssetLineage tests.

Browse source 
cascadeLineage will crash because it does not check for duplicate lineages.
Removed a duplicate check for $newParent definedness in setParent.
This commit is contained in:
Colin Kuskie 2007-04-13 20:19:23 +00:00
parent 15c245b06a
commit 9e4216c4a0
2 changed files with 63 additions and 23 deletions
Download patch file Download diff file Expand all files Collapse all files

46
t/Asset/AssetLineage.t
View file

@ -16,7 +16,7 @@ use WebGUI::Test;
use WebGUI::Session;
use WebGUI::Asset;
use Test::More tests => 9; # increment this value for each test you create
use Test::More tests => 15; # increment this value for each test you create
use Test::Deep;
# Test the methods in WebGUI::AssetLineage
@ -37,7 +37,13 @@ my $folder = $root->addChild({
title => 'folder',
menuTitle => 'folderMenuTitle',
className => 'WebGUI::Asset::Wobject::Folder',
isPackage => 1,
});
my $folder2 = $root->addChild({
url => 'testFolder2',
title => 'folder2',
menuTitle => 'folder2MenuTitle',
className => 'WebGUI::Asset::Wobject::Folder',
});
my @snippets = ();
@ -51,6 +57,15 @@ foreach my $snipNum (0..6) {
menuTitle => $snipNum,
});
}
my $snippet2 = $folder2->addChild( {
className => "WebGUI::Asset::Snippet",
groupIdView => 7,
groupIdEdit => 3,
title => "Snippet2 0",
menuTitle => 0,
});
$versionTag->commit;
my @snipIds = map { $_->getId } @snippets;
@ -92,6 +107,33 @@ ok($folder->hasChildren, 'test folder has children');
ok($root->hasChildren, 'root node has children');
ok(!$snippets[0]->hasChildren, 'test snippet has no children');
####################################################
#
# cascadeLineage
#
####################################################
#diag $snippets[0]->get('lineage');
#diag $snippet2->get('lineage');
##Uncomment me to crash the test
#$snippet2->cascadeLineage($snippets[0]->get('lineage'));
#diag $snippets[0]->get('lineage');
#diag $snippet2->get('lineage');
####################################################
#
# setParent
#
####################################################
ok(!$snippet2->setParent(), 'setParent: new parent must be passed in');
ok(!$snippet2->setParent($snippet2), 'setParent: cannot be your own parent');
ok(!$snippet2->setParent($folder2), 'setParent: will not move self to current parent');
ok(!$snippet2->setParent($folder), 'setParent: user must be in group 4 to do this');
$session->user({userId => 3});
ok($snippet2->setParent($folder), 'setParent: Admin can run setParent');
is($folder->getChildCount, 8, 'setParent: folder now has 8 children');
END {
$versionTag->rollback;
}