Also leaking a version tag.

This commit is contained in:
Colin Kuskie 2009-02-03 04:23:22 +00:00
parent 4ac37757ca
commit 151ebbde09

View file

@ -329,4 +329,8 @@ END {
if (defined $car && (ref($car) eq 'WebGUI::Asset::Sku::Product')) {
$car->purge;
}
my $tag = WebGUI::VersionTag->getWorking($session, 'nocreate');
if (defined $tag) {
$tag->rollback;
}
}