Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 22610: (QA follow-up) Make upgrade query more accurate

Browse source 
Signed-off-by: Liz Rea <wizzyrea@gmail.com>
Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
This commit is contained in:
Kyle Hall 2019-05-09 06:57:12 -04:00 committed by Martin Renvoize
parent 3326ce607d
commit fe0561ee41
Signed by: martin.renvoize
GPG key ID: 422B469130441A0F
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
installer/data/mysql/atomicupdate/bug_22610.perl
View file

@ -40,7 +40,7 @@ if ( CheckVersion($DBversion) ) {
accounttype = 'Pay02';
});
my $sth = $dbh->prepare( qq{SELECT * FROM accountlines WHERE accounttype LIKE "Pay%" AND accounttype != "Pay" } );
my $sth = $dbh->prepare( qq{SELECT * FROM accountlines WHERE accounttype REGEXP '^Pay[[:digit:]]{2}$' } );
$sth->execute();
my $seen = {};
while (my $row = $sth->fetchrow_hashref) {