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

update PayDriver.t with the latest definition and form elements

Browse source
This commit is contained in:
Colin Kuskie 2008-05-30 07:18:05 +00:00
parent 70f657d042
commit 844c39e321
1 changed files with 2 additions and 14 deletions
Download patch file Download diff file Expand all files Collapse all files

16
t/Shop/PayDriver.t
View file

@ -69,7 +69,6 @@ cmp_deeply (
$definition = WebGUI::Shop::PayDriver->definition($session);
use Data::Dumper;
diag Dumper $definition;
cmp_deeply (
$definition,
@ -98,16 +97,9 @@ cmp_deeply (
fieldType => 'template',
label => ignore(),
hoverHelp => ignore(),
defaultValue => '',
defaultValue => 'BMzuE91-XB8E-XGll1zpvA',
namespace => 'Shop/ReceiptEmail',
},
saleNotificationTemplateId => {
fieldType => 'template',
label => ignore(),
hoverHelp => ignore(),
defaultValue => '',
namespace => 'Shop/SaleEmail',
},
saleNotificationGroupId => {
fieldType => 'group',
label => ignore(),
@ -316,7 +308,7 @@ my @forms = HTML::Form->parse($html, 'http://www.webgui.org');
is (scalar @forms, 1, 'getEditForm generates just 1 form');
my @inputs = $forms[0]->inputs;
is (scalar @inputs, 12, 'getEditForm: the form has 10 controls');
is (scalar @inputs, 11, 'getEditForm: the form has 11 controls');
my @interestingFeatures;
foreach my $input (@inputs) {
@ -368,10 +360,6 @@ cmp_deeply(
name => 'receiptEmailTemplateId',
type => 'option',
},
{
name => 'saleNotificationTemplateId',
type => 'option',
},
{
name => 'saleNotificationGroupId',
type => 'option',