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

WebGUI ships with 1 driver, do not delete it

Browse source
This commit is contained in:
Colin Kuskie 2008-06-15 04:30:50 +00:00
parent 132c3fe8e2
commit 6e9031de4a
2 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
t/Shop/Ship.t
View file

@ -160,7 +160,10 @@ $driver2 = $ship->addShipper('WebGUI::Shop::ShipDriver::FlatRate', { enabled=>1,
$shippers = $ship->getShippers(); $shippers = $ship->getShippers();
is(scalar @{$shippers}, 3, 'getShippers: got both shippers'); is(scalar @{$shippers}, 3, 'getShippers: got both shippers');
use Data::Dumper;
diag Dumper $shippers;
my @shipperNames = map { $_->get("label") } @{ $shippers }; my @shipperNames = map { $_->get("label") } @{ $shippers };
diag Dumper \@shipperNames;
cmp_bag( cmp_bag(
\@shipperNames, \@shipperNames,
[q{Jake's Jailbird Airmail},q{Tommy's cut-rate shipping},q{Free Shipping}, ], [q{Jake's Jailbird Airmail},q{Tommy's cut-rate shipping},q{Free Shipping}, ],

1
t/Shop/ShipDriver/FlatRate.t
View file

@ -252,5 +252,4 @@ undef $driver;
#---------------------------------------------------------------------------- #----------------------------------------------------------------------------
# Cleanup # Cleanup
END { END {
$session->db->write('delete from shipper');
} }