From: ivan Date: Sun, 13 Oct 2002 01:05:27 +0000 (+0000) Subject: bug fix in new ACH code X-Git-Tag: freeside_1_4_1beta4~3 X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=f81975da5262aba563cf4e61fc1b0c7815307d3b;p=freeside.git bug fix in new ACH code --- diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm index c31405036..6d9597557 100644 --- a/FS/FS/cust_bill.pm +++ b/FS/FS/cust_bill.pm @@ -687,7 +687,7 @@ sub realtime_bop { $cust_main->paydate =~ /^\d{2}(\d{2})[\/\-](\d+)[\/\-]\d+$/; $content{expiration} = "$2/$1"; } elsif ( $method eq 'ECHECK' ) { - my($account_number,$routing_code) = $cust_main->payinfo + my($account_number,$routing_code) = $cust_main->payinfo; ( $content{account_number}, $content{routing_code} ) = split('@', $cust_main->payinfo); $content{bank_name} = $cust_main->payname; @@ -1165,7 +1165,7 @@ sub print_text { =head1 VERSION -$Id: cust_bill.pm,v 1.41.2.5 2002-10-12 10:15:53 ivan Exp $ +$Id: cust_bill.pm,v 1.41.2.6 2002-10-13 01:05:27 ivan Exp $ =head1 BUGS