Make the new getPackageList functionally equivalent to the old one.

This commit is contained in:
Colin Kuskie 2009-06-17 01:11:22 +00:00
parent 914620f5a4
commit 3bc2006991
2 changed files with 5 additions and 3 deletions

View file

@ -67,6 +67,8 @@ is(scalar @{ $targetFolderChildren }, 0, 'target folder has no children');
$versionTag->commit;
sleep 2;
$targetFolder->www_deployPackage();
$targetFolderChildren = $targetFolder->getLineage(["children"], {returnObjects => 1,});
@ -83,7 +85,7 @@ is(scalar @{ $deployedFolderChildren }, 1, 'deployed package folder still has 1
isa_ok($deployedFolderChildren->[0] , 'WebGUI::Asset::Snippet', 'deployed child is a Snippet');
##Unset isPackage in this versionTag for the next tests
$folder->update({isPackage => 0});
$folder->addRevision({isPackage => 0});
my $newVersionTag = WebGUI::VersionTag->getWorking($session);
WebGUI::Test->tagsToRollback($newVersionTag);