[freeside-commits] branch master updated. bf2769eca6c8bdcf0332e43cc654f35280624d12

[Mark Wells]

The branch, master has been updated
       via  bf2769eca6c8bdcf0332e43cc654f35280624d12 (commit)
      from  e4c42d0a335f5a544d68ac7e7a6025694503accd (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit bf2769eca6c8bdcf0332e43cc654f35280624d12
Author: Mark Wells <mark at freeside.biz>
Date:   Tue Jul 9 14:57:49 2013 -0700

    use per-agent config for all EFT Canada batch options, #23757, from #14859

diff --git a/FS/FS/pay_batch.pm b/FS/FS/pay_batch.pm
index 2a048a1..3a06914 100644
--- a/FS/FS/pay_batch.pm
+++ b/FS/FS/pay_batch.pm
@@ -946,7 +946,7 @@ sub export_batch {
 
   my $info = $export_info{$format} or die "Format not found: '$format'\n";
 
-  &{$info->{'init'}}($conf) if exists($info->{'init'});
+  &{$info->{'init'}}($conf, $self->agentnum) if exists($info->{'init'});
 
   my $oldAutoCommit = $FS::UID::AutoCommit;
   local $FS::UID::AutoCommit = 0;
diff --git a/FS/FS/pay_batch/eft_canada.pm b/FS/FS/pay_batch/eft_canada.pm
index b24c9c3..64fd2f9 100644
--- a/FS/FS/pay_batch/eft_canada.pm
+++ b/FS/FS/pay_batch/eft_canada.pm
@@ -58,7 +58,13 @@ my %holiday = (
 
   init => sub {
     my $conf = shift;
-    my @config = $conf->config('batchconfig-eft_canada'); 
+    my $agentnum = shift;
+    my @config;
+    if ( $conf->exists('batch-spoolagent') ) {
+      @config = $conf->config('batchconfig-eft_canada', $agentnum);
+    } else {
+      @config = $conf->config('batchconfig-eft_canada');
+    }
     # SFTP login, password, trans code, delay time
     my $process_delay;
     ($trans_code, $process_delay) = @config[2,3];

-----------------------------------------------------------------------

Summary of changes:
 FS/FS/pay_batch.pm            |    2 +-
 FS/FS/pay_batch/eft_canada.pm |    8 +++++++-
 2 files changed, 8 insertions(+), 2 deletions(-)