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

convert all cleanup methods to addToCleanup

Browse source
This commit is contained in:
Graham Knop 2010-06-10 08:59:18 -05:00
parent 0ef509374f
commit b832deecd1
86 changed files with 198 additions and 315 deletions
Download patch file Download diff file Expand all files Collapse all files

2
t/Shop/AddressBook.t
View file

@ -220,7 +220,7 @@ undef $book;
my $otherSession = WebGUI::Test->newSession;
my $mergeUser = WebGUI::User->create($otherSession);
WebGUI::Test->usersToDelete($mergeUser);
WebGUI::Test->addToCleanup($mergeUser);
$otherSession->user({user => $mergeUser});
my $adminBook = WebGUI::Shop::AddressBook->create($otherSession);
WebGUI::Test->addToCleanup($adminBook);

2
t/Shop/Cart.t
View file

@ -155,7 +155,7 @@ is($session->db->quickScalar("select count(*) from cartItem where cartId=?",[ $c
my $session2 = WebGUI::Session->open(WebGUI::Test->root, WebGUI::Test->file);
WebGUI::Test->sessionsToDelete($session2);
WebGUI::Test->addToCleanup($session2);
$session2->user({userId => 3});
my $cart2 = WebGUI::Shop::Cart->newBySession($session2);
WebGUI::Test->addToCleanup($cart2);

2
t/Shop/PayDriver/ITransact.t
View file

@ -90,7 +90,7 @@ my $foreignHammer = $rockHammer->setCollateral('variantsJSON', 'variantId', 'new
$versionTag->commit;
WebGUI::Test->tagsToRollback($versionTag);
WebGUI::Test->addToCleanup($versionTag);
my $hammerItem = $rockHammer->addToCart($rockHammer->getCollateral('variantsJSON', 'variantId', $smallHammer));

2
t/Shop/ShipDriver/UPS.t
View file

@ -33,7 +33,7 @@ use Locales;
# Init
my $session = WebGUI::Test->session;
my $user = WebGUI::User->create($session);
WebGUI::Test->usersToDelete($user);
WebGUI::Test->addToCleanup($user);
$session->user({user => $user});
#----------------------------------------------------------------------------

2
t/Shop/ShipDriver/USPS.t
View file

@ -31,7 +31,7 @@ plan tests => 69;
# Init
my $session = WebGUI::Test->session;
my $user = WebGUI::User->create($session);
WebGUI::Test->usersToDelete($user);
WebGUI::Test->addToCleanup($user);
$session->user({user => $user});
#----------------------------------------------------------------------------

2
t/Shop/ShipDriver/USPSInternational.t
View file

@ -31,7 +31,7 @@ plan tests => 40;
# Init
my $session = WebGUI::Test->session;
my $user = WebGUI::User->create($session);
WebGUI::Test->usersToDelete($user);
WebGUI::Test->addToCleanup($user);
$session->user({user => $user});
#----------------------------------------------------------------------------

2
t/Shop/TaxDriver/EU.t
View file

@ -37,7 +37,7 @@ my $session = WebGUI::Test->session;
my $taxUser = WebGUI::User->new( $session, 'new' );
$taxUser->username( 'Tex Evasion' );
$session->user({userId => $taxUser->getId});
WebGUI::Test->usersToDelete($taxUser);
WebGUI::Test->addToCleanup($taxUser);
# Test VAT numbers
my $testVAT_NL = 'NL123456789B12';

2
t/Shop/Vendor.t
View file

@ -44,7 +44,7 @@ my $fenceUser = WebGUI::User->new($session, 'new');
$fenceUser->username('fence');
my $guardUser = WebGUI::User->new($session, 'new');
$guardUser->username('guard');
WebGUI::Test->usersToDelete($fenceUser, $guardUser);
WebGUI::Test->addToCleanup($fenceUser, $guardUser);
$numberOfVendors = scalar @{ WebGUI::Shop::Vendor->getVendors($session) };