From d5523a70b46146a35943b79379526b64aa5cf146 Mon Sep 17 00:00:00 2001 From: Jonathan Prykop Date: Thu, 2 Apr 2015 14:48:48 -0500 Subject: [PATCH] RT#33286: Direct Debit by BillBuddy for Bank Accounts [added handling of gateway_username/password for BatchPayment modules] --- FS/FS/payment_gateway.pm | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/FS/FS/payment_gateway.pm b/FS/FS/payment_gateway.pm index 68d841855..d2695ed46 100644 --- a/FS/FS/payment_gateway.pm +++ b/FS/FS/payment_gateway.pm @@ -277,6 +277,13 @@ sub batch_processor { eval "use Business::BatchPayment;"; die "couldn't load Business::BatchPayment: $@" if $@; + #false laziness with processor + foreach (qw(username password)) { + if (length($self->get("gateway_$_"))) { + $opt{$_} = $self->get("gateway_$_"); + } + } + my $module = $self->gateway_module; my $processor = eval { Business::BatchPayment->create($module, $self->options, %opt) -- 2.11.0