Last batch of User and Group cleanups.
This commit is contained in:
parent
39607fc208
commit
d83f1fd5fc
7 changed files with 7 additions and 12 deletions
|
|
@ -24,6 +24,7 @@ plan tests => 4; # increment this value for each test you create
|
|||
my $session = WebGUI::Test->session;
|
||||
|
||||
my $user = WebGUI::User->new($session, "new");
|
||||
WebGUI::Test->usersToDelete($user);
|
||||
|
||||
$session->user({user => $user});
|
||||
|
||||
|
|
@ -55,8 +56,5 @@ my $slave2 = $session->dbSlave;
|
|||
isa_ok($slave2, 'WebGUI::SQL');
|
||||
|
||||
END {
|
||||
foreach my $dude ($user) {
|
||||
$dude->delete if (defined $dude and ref $dude eq 'WebGUI::User');
|
||||
}
|
||||
$session->config->delete('dbslave2');
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue