From 12ff9cacb95d18ee0398c85f9e71ce8f21940136 Mon Sep 17 00:00:00 2001
From: Mark Wells <mark@freeside.biz>
Date: Tue, 19 Jul 2016 12:56:06 -0700
Subject: [PATCH] unreverse the check for tokenized payinfo, #71291
---
FS/FS/cust_main.pm | 2 +-
FS/FS/payinfo_Mixin.pm | 2 +-
2 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index bd463072c..8e2fa19a4 100644
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -1967,7 +1967,7 @@ sub check {
or return gettext('invalid_card'); # . ": ". $self->payinfo;
my $cardtype = cardtype($payinfo);
- $cardtype = 'Tokenized' if $self->payinfo !~ /^99\d{14}$/; # token
+ $cardtype = 'Tokenized' if $self->payinfo =~ /^99\d{14}$/; # token
return gettext('unknown_card_type') if $cardtype eq 'Unknown';
diff --git a/FS/FS/payinfo_Mixin.pm b/FS/FS/payinfo_Mixin.pm
index b02e98eb2..4da40e326 100644
--- a/FS/FS/payinfo_Mixin.pm
+++ b/FS/FS/payinfo_Mixin.pm
@@ -201,7 +201,7 @@ sub payinfo_check {
my $payinfo = $self->payinfo;
my $cardtype = cardtype($payinfo);
- $cardtype = 'Tokenized' if $payinfo !~ /^99\d{14}$/;
+ $cardtype = 'Tokenized' if $payinfo =~ /^99\d{14}$/;
$self->set('paycardtype', $cardtype);
if ( $ignore_masked_payinfo and $self->mask_payinfo eq $self->payinfo ) {
--
2.20.1