X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=fs_selfservice%2FFS-SelfService%2Fcgi%2Fselfservice.cgi;h=1c6f890915e8c5c9e0137d4d407953defdc414a8;hb=c3687752e9c91b82ab22628d857f958e9aa57b3e;hp=38416c5933a9870a5e1c236c9f8cf20a248cfb87;hpb=a2089f7e571c6634814223161fd1207a764a9c8d;p=freeside.git

diff --git a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi
index 38416c593..1c6f89091 100644
--- a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi
+++ b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi
@@ -323,7 +323,7 @@ sub payment_results {
   my $amount = $1;
 
   my $payinfo = $cgi->param('payinfo');
-  $payinfo =~ s/\D//g;
+  $payinfo =~ s/[^\dx]//g;
   $payinfo =~ /^(\d{13,16})$/
     #or $error ||= $init_data->{msgcat}{invalid_card}; #. $self->payinfo;
     or die "illegal card"; #!!!