From a0564496b9b4344d95ee1cdd2529b9e49c548209 Mon Sep 17 00:00:00 2001 From: Tomas Cohen Arazi Date: Mon, 9 Oct 2023 16:30:41 -0300 Subject: [PATCH] Bug 34657: DBRev 23.06.00.029 Signed-off-by: Tomas Cohen Arazi --- Koha.pm | 2 +- .../230600029.pl} | 3 +-- 2 files changed, 2 insertions(+), 3 deletions(-) rename installer/data/mysql/{atomicupdate/bug-34657-update-unimarc-123defg-plugins.pl => db_revs/230600029.pl} (94%) diff --git a/Koha.pm b/Koha.pm index a91cf1c71e..a92b443e3d 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 = "23.06.00.028"; +$VERSION = "23.06.00.029"; sub version { return $VERSION; diff --git a/installer/data/mysql/atomicupdate/bug-34657-update-unimarc-123defg-plugins.pl b/installer/data/mysql/db_revs/230600029.pl similarity index 94% rename from installer/data/mysql/atomicupdate/bug-34657-update-unimarc-123defg-plugins.pl rename to installer/data/mysql/db_revs/230600029.pl index 74bec0d467..841219705d 100755 --- a/installer/data/mysql/atomicupdate/bug-34657-update-unimarc-123defg-plugins.pl +++ b/installer/data/mysql/db_revs/230600029.pl @@ -2,12 +2,11 @@ use Modern::Perl; return { bug_number => "34657", - description => "Update MARC frameworks to use renamed UNIMARC plugin", + description => "Update MARC frameworks to use renamed UNIMARC plugin (unimarc_field_123defg.pl)", up => sub { my ($args) = @_; my ( $dbh, $out ) = @$args{qw(dbh out)}; - # Do you stuffs here $dbh->do(q{ UPDATE `marc_subfield_structure` SET `value_builder` = 'unimarc_field_123defg.pl' WHERE (`value_builder` = 'unimarc_field_123d.pl' OR `value_builder` = 'unimarc_field_123e.pl' OR `value_builder` = 'unimarc_field_123f.pl' OR `value_builder` = 'unimarc_field_123g.pl' ); }); -- 2.39.5