Fix problems with the Story Archive leaking version tags when it is not committed. Fixes bug #11678

This commit is contained in:
Colin Kuskie 2010-06-23 14:12:42 -07:00
parent 321f165147
commit b7ba9f2118
5 changed files with 31 additions and 6 deletions

View file

@ -62,7 +62,10 @@ $creationDateSth->execute([$weekAgo, $weekStory->getId]);
my $versionTag = WebGUI::VersionTag->getWorking($session);
$versionTag->commit;
addToCleanup($versionTag);
WebGUI::Test->addToCleanup($versionTag);
foreach my $asset ($archive1, $archive2) {
$asset = $asset->cloneFromDb;
}
my $workflow = WebGUI::Workflow->create($session,
{