summaryrefslogtreecommitdiff
path: root/FS
diff options
context:
space:
mode:
authorIvan Kohler <ivan@freeside.biz>2017-05-11 13:08:13 -0700
committerIvan Kohler <ivan@freeside.biz>2017-05-11 13:08:13 -0700
commit0cc73df2d8ca19b1f8c2fc93bd4f2468b738b969 (patch)
treec9ab23223343c8d85d72974ff9be6aacaa6847a2 /FS
parentf79377d752c38762833b9ff3982046a31488d0df (diff)
3.92
Diffstat (limited to 'FS')
-rw-r--r--FS/FS.pm2
-rw-r--r--FS/FS/payinfo_Mixin.pm2
2 files changed, 2 insertions, 2 deletions
diff --git a/FS/FS.pm b/FS/FS.pm
index 4d35a813a..9e5b13ba4 100644
--- a/FS/FS.pm
+++ b/FS/FS.pm
@@ -3,7 +3,7 @@ package FS;
use strict;
use vars qw($VERSION);
-$VERSION = '3.92~git';
+$VERSION = '3.92';
#find missing entries in this file with:
# for a in `ls *pm | cut -d. -f1`; do grep 'L<FS::'$a'>' ../FS.pm >/dev/null || echo "missing $a" ; done
diff --git a/FS/FS/payinfo_Mixin.pm b/FS/FS/payinfo_Mixin.pm
index 6023aa217..f4c6b4a86 100644
--- a/FS/FS/payinfo_Mixin.pm
+++ b/FS/FS/payinfo_Mixin.pm
@@ -222,7 +222,7 @@ sub payinfo_check {
$payinfo =~ s/\D//g;
$self->payinfo($payinfo);
if ( $self->payinfo ) {
- $self->payinfo =~ /^(\d{13,16}|\d{8,9})$/
+ $self->payinfo =~ /^(\d{13,19}|\d{8,9})$/
or return "Illegal (mistyped?) credit card number (payinfo)";
$self->payinfo($1);
validate($self->payinfo) or return "Illegal credit card number";