diff options
author | Ivan Kohler <ivan@freeside.biz> | 2017-02-18 17:10:24 -0800 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2017-02-18 17:10:24 -0800 |
commit | d61cf1825f89216eebc83da5510c34b330b55abb (patch) | |
tree | d8f4d6644a80dcfbe32c8f19fce398a8402b6f3e /fs_selfservice/FS-SelfService/cgi/selfservice.cgi | |
parent | 717ed956e64cfc10f1e78e67b6c82dfcf212a18d (diff) |
19 digit visa and discover cards
Diffstat (limited to 'fs_selfservice/FS-SelfService/cgi/selfservice.cgi')
-rwxr-xr-x | fs_selfservice/FS-SelfService/cgi/selfservice.cgi | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi index d44a3799b..3915dca28 100755 --- a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi +++ b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi @@ -618,7 +618,7 @@ sub payment_results { my $payinfo = $cgi->param('payinfo'); $payinfo =~ s/[^\dx]//g; - $payinfo =~ /^([\dx]{13,16}|[\dx]{8,9})$/ + $payinfo =~ /^([\dx]{13,19}|[\dx]{8,9})$/ #or $error ||= $init_data->{msgcat}{invalid_card}; #. $self->payinfo; or return { 'error' => "illegal card" }; #!!! $payinfo = $1; |