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

use addToCleanup instead of an END block.

Browse source
This commit is contained in:
Colin Kuskie 2009-12-07 13:07:11 -08:00
parent 5a25a44221
commit 89ea0e7cea
1 changed files with 4 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

11
t/Workflow/Activity/ArchiveOldStories.t
View file

@ -62,6 +62,7 @@ $creationDateSth->execute([$weekAgo, $weekStory->getId]);
my $versionTag = WebGUI::VersionTag->getWorking($session);
$versionTag->commit;
addToCleanup($versionTag);
my $workflow = WebGUI::Workflow->create($session,
{
@ -70,6 +71,8 @@ my $workflow = WebGUI::Workflow->create($session,
mode => 'realtime',
},
);
addToCleanup($workflow);
my $activity = $workflow->addActivity('WebGUI::Workflow::Activity::ArchiveOldStories');
my $instance1 = WebGUI::Workflow::Instance->create($session,
@ -118,10 +121,4 @@ $archivedAssets = $home->getLineage(
);
cmp_bag( $archivedAssets, [ $weekStory->getId, $weekFolder->getId ], 'Nothing archived.');
END {
$creationDateSth->finish;
$versionTag->rollback;
$workflow->delete;
}
$creationDateSth->finish;