Add a basic test for the PayPalStd driver.
This commit is contained in:
parent
7cd17bde85
commit
b877e8fa05
2 changed files with 91 additions and 2 deletions
|
|
@ -142,9 +142,13 @@ is($newDriver->get('label'), 'Cold, stone hard cash', 'label passed correctly to
|
|||
|
||||
my $drivers = $pay->getDrivers();
|
||||
|
||||
use Data::Dumper;
|
||||
diag Dumper $drivers;
|
||||
|
||||
my $defaultPayDrivers = {
|
||||
'WebGUI::Shop::PayDriver::Cash' => 'Cash',
|
||||
'WebGUI::Shop::PayDriver::ITransact' => 'Credit Card (ITransact)',
|
||||
'WebGUI::Shop::PayDriver::Cash' => 'Cash',
|
||||
'WebGUI::Shop::PayDriver::ITransact' => 'Credit Card (ITransact)',
|
||||
'WebGUI::Shop::PayDriver::PayPal::PayPalStd' => 'PayPal',
|
||||
};
|
||||
|
||||
cmp_deeply( $drivers, $defaultPayDrivers, 'getDrivers returns the default PayDrivers');
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue