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

Another batch of clean-ups for users and groups.

Browse source
This commit is contained in:
Colin Kuskie 2009-05-01 02:48:18 +00:00
parent c60237443c
commit 39607fc208
6 changed files with 16 additions and 30 deletions
Download patch file Download diff file Expand all files Collapse all files

6
t/Asset/Post/Thread/permission.t
View file

@ -30,6 +30,7 @@ my $node = WebGUI::Asset->getImportNode( $session );
my %user;
$user{"2"} = WebGUI::User->new( $session, "new" );
WebGUI::Test->usersToDelete($user{'2'});
$user{"2"}->addToGroups( ['2'] ); # Registered user
my $versionTag = WebGUI::VersionTag->getWorking( $session );
@ -122,8 +123,7 @@ $thread->unlock;
#----------------------------------------------------------------------------
# Cleanup
END {
for my $user ( values %user ) {
$user->delete;
}
my $subscriptionGroup = WebGUI::Group->new($session, $thread->get('subscriptionGroupId'));
WebGUI::Test->groupsToDelete($subscriptionGroup);
$versionTag->rollback;
}