Add method to clean up test sessions. This has to be done

after ALL other types of objects have been cleaned up.
More test clean-up for users, groups and sessions.
This commit is contained in:
Colin Kuskie 2009-05-01 02:02:12 +00:00
parent d7f2aca1e4
commit 004b8095a1
5 changed files with 47 additions and 33 deletions

View file

@ -77,12 +77,10 @@ sub addUser {
##so the test will not fail in the summer
$user->profileField("timeZone","America/Hermosillo");
$user->username("Time Zone");
WebGUI::Test->usersToDelete($user);
return $user;
}
END { ##Clean-up after yourself, always
foreach my $dude ($timeZoneUser) {
$dude->delete if (defined $dude and ref $dude eq 'WebGUI::User');
}
}