[freeside-commits] branch FREESIDE_4_BRANCH updated. b7eced75ed18c5cf4ef3f120295ec74b5a19218d

[Ivan]

The branch, FREESIDE_4_BRANCH has been updated
       via  b7eced75ed18c5cf4ef3f120295ec74b5a19218d (commit)
      from  7a7d7b2112988841447a09fc4496d4678d8fc207 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit b7eced75ed18c5cf4ef3f120295ec74b5a19218d
Author: Ivan Kohler <ivan at freeside.biz>
Date:   Wed Feb 1 09:26:49 2017 -0800

    fix Tokenized payinfo on upgrade if we can, RT#71513

diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index d9ca150..3559409 100644
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -5875,8 +5875,8 @@ sub _upgrade_next_recnum {
             ' FROM '.$table.
             ' WHERE '.$tclass->primary_key.' > '.$$lastrecnum.
             "   AND payby IN ( 'CARD', 'DCRD', 'CHEK', 'DCHK' ) ".
-            "   AND ( length(payinfo) > 80 OR paycardtype = 'Tokenized' ) ".
-            ' ORDER BY '.$tclass->primary_key.' LIMIT 500';;
+            "   AND ( length(payinfo) < 80 OR paycardtype = 'Tokenized' ) ".
+            ' ORDER BY '.$tclass->primary_key.' LIMIT 500';
   my $sth = $dbh->prepare($sql) or die $dbh->errstr;
   $sth->execute() or die $sth->errstr;
   my @recnums;

-----------------------------------------------------------------------

Summary of changes:
 FS/FS/cust_main.pm |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)