[freeside-commits] freeside/FS/FS pay_batch.pm,1.15.2.5,1.15.2.6

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv31030

Modified Files:
      Tag: FREESIDE_1_9_BRANCH
	pay_batch.pm 
Log Message:
put batch card numbers/masks in cust_pay so they can be refunded, patch from peter loeppky, RT#8776

Index: pay_batch.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/pay_batch.pm,v
retrieving revision 1.15.2.5
retrieving revision 1.15.2.6
diff -u -w -d -r1.15.2.5 -r1.15.2.6
--- pay_batch.pm	16 Jun 2010 02:19:24 -0000	1.15.2.5
+++ pay_batch.pm	23 Jul 2010 23:16:19 -0000	1.15.2.6
@@ -362,7 +362,8 @@
         'custnum'  => $custnum,
 	'payby'    => $payby,
         'paybatch' => $self->batchnum,
-        map { $_ => $hash{$_} } (qw( paid _date payinfo )),
+        'payinfo'  => ( $hash{'payinfo'} || $cust_pay_batch->payinfo ),
+        map { $_ => $hash{$_} } (qw( paid _date )),
       } );
       $error = $cust_pay->insert;
       if ( $error ) {