summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2002-10-13 01:05:27 +0000
committerivan <ivan>2002-10-13 01:05:27 +0000
commitf81975da5262aba563cf4e61fc1b0c7815307d3b (patch)
treedf40a3dfa884545f850aba4cd7edd72a4da788fb
parentc2d273fd77c5b07e5a01b5c756a4b8273a16d239 (diff)
bug fix in new ACH code
-rw-r--r--FS/FS/cust_bill.pm4
1 files changed, 2 insertions, 2 deletions
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