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

END block cleanups

Browse source
This commit is contained in:
Colin Kuskie 2010-06-13 21:19:17 -07:00
parent 2c1e2b9d3e
commit f50d3b7adb
5 changed files with 7 additions and 24 deletions
Download patch file Download diff file Expand all files Collapse all files

8
t/Session/Privilege.t
View file

@ -73,6 +73,7 @@ my $session = WebGUI::Test->session;
my $privilege = $session->privilege;
my ($versionTag, $userTemplate) = setup_assets($session);
WebGUI::Test->addToCleanup($versionTag);
isa_ok($privilege, 'WebGUI::Session::Privilege', 'session has correct object type');
@ -144,9 +145,4 @@ sub setup_assets {
return ($versionTag, $userTemplate);
}
END {
if (defined $versionTag and ref $versionTag eq 'WebGUI::VersionTag') {
$versionTag->rollback;
}
}
#vim:ft=perl