Convert pPFFP to use Definition.
This commit is contained in:
parent
be35b8afe4
commit
0ca7cf8a81
2 changed files with 44 additions and 107 deletions
|
|
@ -448,4 +448,32 @@ is ($count, 0, 'delete deleted the object');
|
|||
|
||||
undef $driver;
|
||||
|
||||
#######################################################################
|
||||
#
|
||||
# processPropertiesFromFormPost
|
||||
#
|
||||
#######################################################################
|
||||
|
||||
$session->request->setup_body({
|
||||
label => 'form processed driver',
|
||||
enabled => 1,
|
||||
groupToUse => 7,
|
||||
});
|
||||
|
||||
my $form_driver = WebGUI::Shop::PayDriver->new($session, {});
|
||||
WebGUI::Test->addToCleanup($form_driver);
|
||||
|
||||
$form_driver->processPropertiesFromFormPost;
|
||||
|
||||
cmp_deeply(
|
||||
$form_driver->get(),
|
||||
{
|
||||
label => 'form processed driver',
|
||||
enabled => 1,
|
||||
groupToUse => 7,
|
||||
paymentGatewayId => $form_driver->paymentGatewayId,
|
||||
},
|
||||
'form contents processed. Missing form properties inherit defaults'
|
||||
);
|
||||
|
||||
done_testing;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue