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

Fix cleanup of Inbox messages for users. Provide a method for cleaning up Admin's messages.

Browse source
This commit is contained in:
Colin Kuskie 2010-06-09 17:23:42 -07:00
parent 8edcab37a6
commit 53721581a1
3 changed files with 24 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

19
t/lib/WebGUI/Test.pm
View file

@ -697,6 +697,25 @@ sub assetsToPurge {
#----------------------------------------------------------------------------
=head2 cleanupAdminInbox ( )
Push a list of Asset objects onto the stack of assets to be automatically purged
at the end of the test. This will also clean-up all version tags associated
with the Asset.
This is a class method.
=cut
sub cleanupAdminInbox {
my $class = shift;
my $admin = WebGUI::User->new($class->session, '3');
my $inbox = WebGUI::Inbox->new($class->session);
$inbox->deleteMessagesForUser($admin);
}
#----------------------------------------------------------------------------
=head2 groupsToDelete ( $group, [$group ] )
Push a list of group objects onto the stack of groups to be automatically deleted