RT# 82988 - Fixed so only formats that can handle electronic refunds can download...
[freeside.git] / FS / FS / Cron / pay_batch.pm
index cdda681..faa9cd9 100644 (file)
@@ -67,7 +67,7 @@ sub pay_batch_submit {
     my ($gateway, $payby, $agentnum) = @$config;
     if ( $gateway->batch_processor->can('default_transport') ) {
 
-      my $search = { status => 'O', payby => $payby };
+      my $search = { status => 'O', payby => $payby, type => 'DEBIT' };
       $search->{agentnum} = $agentnum if $agentnum;
 
       foreach my $pay_batch ( qsearch('pay_batch', $search) ) {
@@ -79,7 +79,7 @@ sub pay_batch_submit {
           # warn the error and continue. rolling back the transaction once 
           # we've started sending batches is bad.
           warn "error submitting batch ".$pay_batch->batchnum." to gateway '".
-          $gateway->label."\n$@\n";
+          $gateway->label."'\n$@\n";
         }
       }