summaryrefslogtreecommitdiff
path: root/FS
diff options
context:
space:
mode:
authorivan <ivan>2007-09-17 21:12:58 +0000
committerivan <ivan>2007-09-17 21:12:58 +0000
commit17dfcf3f0af038d47b902ad768e137a42a7a141e (patch)
tree9522162af3857f4636efca206193403b12a1c79e /FS
parent637eff4aa1b4d9c7f163579472ca0ed7c24e8075 (diff)
fix scoping issues with $1 and $2 resulting in payinfo trying getting set to xxEK, thanks to _vlad_ for tracking this down and providing a fix
Diffstat (limited to 'FS')
-rw-r--r--FS/FS/cust_main.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index bb3dcdb37..6512888ca 100644
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -1439,10 +1439,11 @@ sub check {
$payinfo =~ s/[^\d\@]//g;
if ( $conf->exists('echeck-nonus') ) {
$payinfo =~ /^(\d+)\@(\d+)$/ or return 'invalid echeck account@aba';
+ $payinfo = "$1\@$2";
} else {
$payinfo =~ /^(\d+)\@(\d{9})$/ or return 'invalid echeck account@aba';
+ $payinfo = "$1\@$2";
}
- $payinfo = "$1\@$2";
$self->payinfo($payinfo);
$self->paycvv('');