Convert pPFFP to use Definition.

This commit is contained in:
Colin Kuskie 2010-09-30 15:50:08 -07:00
parent be35b8afe4
commit 0ca7cf8a81
2 changed files with 44 additions and 107 deletions

View file

@ -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;