diff options
author | ivan <ivan> | 2009-10-01 00:52:17 +0000 |
---|---|---|
committer | ivan <ivan> | 2009-10-01 00:52:17 +0000 |
commit | 61465659c37b037ac8935dcfa294fff1176d8316 (patch) | |
tree | 4890751b1e666b18865b5b128d174e4cdea46c0e | |
parent | c307bde2d50203342212e368df9d0aafc8ae16f5 (diff) |
hopefully the really final fix for the problems using remembered cards in self-service. *sigh*
-rw-r--r-- | fs_selfservice/FS-SelfService/cgi/selfservice.cgi | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi index b6a349c20..749a2e572 100644 --- a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi +++ b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi @@ -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') |