Allow for cleanup of inbox messages in tests.

This commit is contained in:
Colin Kuskie 2010-06-07 10:46:28 -07:00
parent 30e869b66d
commit 99063a3f76
2 changed files with 5 additions and 3 deletions

View file

@ -799,6 +799,7 @@ were passed in. Currently able to destroy:
WebGUI::Shop::AddressBook
WebGUI::DatabaseLink
WebGUI::LDAPLink
WebGUI::Inbox::Message
Example call:
@ -887,6 +888,7 @@ Example call:
'WebGUI::Shop::Transaction' => 'delete',
'WebGUI::Shop::ShipDriver' => 'delete',
'WebGUI::Shop::PayDriver' => 'delete',
'WebGUI::Inbox::Message' => 'purge',
'WebGUI::Shop::Cart' => sub {
my $cart = shift;
my $addressBook = $cart->getAddressBook();