hopefully the really final fix for the problems using remembered cards in self-servic...
authorivan <ivan>
Thu, 1 Oct 2009 00:52:17 +0000 (00:52 +0000)
committerivan <ivan>
Thu, 1 Oct 2009 00:52:17 +0000 (00:52 +0000)
fs_selfservice/FS-SelfService/cgi/selfservice.cgi

index b6a349c..749a2e5 100644 (file)
@@ -333,9 +333,11 @@ sub payment_results {
     #or $error ||= $init_data->{msgcat}{invalid_card}; #. $self->payinfo;
     or die "illegal card"; #!!!
   $payinfo = $1;
-  validate($payinfo)
-    #or $error ||= $init_data->{msgcat}{invalid_card}; #. $self->payinfo;
-    or die "invalid card"; #!!!
+  unless ( $payinfo =~ /x/ ) {
+    validate($payinfo)
+      #or $error ||= $init_data->{msgcat}{invalid_card}; #. $self->payinfo;
+      or die "invalid card"; #!!!
+  }
 
   if ( $cgi->param('card_type') ) {
     cardtype($payinfo) eq $cgi->param('card_type')