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

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

View file

@ -146,10 +146,11 @@ sub deleteMessagesForUser {
my $self = shift;
my $user = shift;
my $db = $self->session->db;
my $messages = $self->getMessagesForUser($user, 1e10);
my $userId = $user->userId;
$db->write("DELETE FROM inbox_messageState WHERE userId=?",[$userId]);
$db->write("DELETE FROM inbox WHERE userId=? AND (groupId IS NULL OR groupId='')",[$userId]);
foreach my $message (@{ $messages }) {
$message->delete($userId);
}
}
#-------------------------------------------------------------------