Mailing List Archive

[interchange/STABLE_5_6-branch] Properly initialize BOP supplemental parameters.
commit 6c4d2ddfa60f38759a41eda6d73c2903202ddb7e
Author: David Christensen <david@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($_); }

_______________________________________________
interchange-cvs mailing list
interchange-cvs@icdevgroup.org
http://www.icdevgroup.org/mailman/listinfo/interchange-cvs