From 3d840153d1e9736f126b04b96eea4367d096996b Mon Sep 17 00:00:00 2001 From: Nick Clemens Date: Fri, 19 Apr 2019 14:51:08 +0000 Subject: [PATCH] Bug 22564: DBRev 18.12.00.060 Signed-off-by: Nick Clemens --- Koha.pm | 2 +- .../data/mysql/atomicupdate/bug_22564.perl | 17 ----------------- installer/data/mysql/updatedatabase.pl | 18 ++++++++++++++++++ 3 files changed, 19 insertions(+), 18 deletions(-) delete mode 100644 installer/data/mysql/atomicupdate/bug_22564.perl diff --git a/Koha.pm b/Koha.pm index 2c78ad9252..4e0eac201f 100644 --- a/Koha.pm +++ b/Koha.pm @@ -29,7 +29,7 @@ use vars qw{ $VERSION }; # - #4 : the developer version. The 4th number is the database subversion. # used by developers when the database changes. updatedatabase take care of the changes itself # and is automatically called by Auth.pm when needed. -$VERSION = "18.12.00.059"; +$VERSION = "18.12.00.060"; sub version { return $VERSION; diff --git a/installer/data/mysql/atomicupdate/bug_22564.perl b/installer/data/mysql/atomicupdate/bug_22564.perl deleted file mode 100644 index 98305ccf81..0000000000 --- a/installer/data/mysql/atomicupdate/bug_22564.perl +++ /dev/null @@ -1,17 +0,0 @@ -$DBversion = 'XXX'; # will be replaced by the RM -if ( CheckVersion($DBversion) ) { - - my $rows = $dbh->do( - qq{ - UPDATE `accountlines` - SET - `accounttype` = 'L', - `status` = 'REPLACED' - WHERE - `accounttype` = 'Rep' - } - ); - - SetVersion($DBversion); - printf "Upgrade to $DBversion done (Bug 22564 - Fix accounttype 'Rep' - %d updated)\n", $rows; -} diff --git a/installer/data/mysql/updatedatabase.pl b/installer/data/mysql/updatedatabase.pl index a47735bb06..71e1db8bab 100755 --- a/installer/data/mysql/updatedatabase.pl +++ b/installer/data/mysql/updatedatabase.pl @@ -18236,6 +18236,24 @@ if( CheckVersion( $DBversion ) ) { print "Upgrade to $DBversion done (Bug 22532 - Remove import_records z3950random column)\n"; } +$DBversion = '18.12.00.060'; +if ( CheckVersion($DBversion) ) { + + my $rows = $dbh->do( + qq{ + UPDATE `accountlines` + SET + `accounttype` = 'L', + `status` = 'REPLACED' + WHERE + `accounttype` = 'Rep' + } + ); + + SetVersion($DBversion); + printf "Upgrade to $DBversion done (Bug 22564 - Fix accounttype 'Rep' - %d updated)\n", $rows; +} + # SEE bug 13068 # if there is anything in the atomicupdate, read and execute it. -- 2.39.5