[interchange/STABLE_5_6-branch] Properly initialize BOP supplemental parameters.
David Christensen
interchange-cvs at icdevgroup.org
Tue Feb 23 05:37:10 UTC 2010
commit 6c4d2ddfa60f38759a41eda6d73c2903202ddb7e
Author: David Christensen <david at endpoint.com>
Date: Mon Feb 22 22:54:56 2010 -0600
Properly initialize BOP supplemental parameters.
This fixes a bug where supplemental parameters passed to the payment
module to initialize the Business::OnlinePayment gateway object get a
value of 1 instead of what's in your catalog.cfg or
products/variable.txt.
Patch by Richard Siddall, with minor bugfixes by David Christensen
lib/Vend/Payment/BusinessOnlinePayment.pm | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
---
diff --git a/lib/Vend/Payment/BusinessOnlinePayment.pm b/lib/Vend/Payment/BusinessOnlinePayment.pm
index 547c36c..8d4f869 100644
--- a/lib/Vend/Payment/BusinessOnlinePayment.pm
+++ b/lib/Vend/Payment/BusinessOnlinePayment.pm
@@ -226,7 +226,7 @@ sub onlinepayment {
#processor options!
my %ignore = map { $_=>1 } qw(gateway processor id secret transaction );
- my %options = map { $_=>1 }
+ my %options = map { $_ => ($opt->{$_} || $main::Variable->{"MV_PAYMENT_" . uc $_ }) }
grep { !$ignore{$_} } (
keys(%$opt),
map { s/^MV_PAYMENT_//; lc($_); }
More information about the interchange-cvs
mailing list