From 25f9762b2981e15473ed674f6733e41914fe2181 Mon Sep 17 00:00:00 2001
From: Katrin Fischer <katrin.fischer@bsz-bw.de>
Date: Fri, 25 Oct 2024 15:09:16 +0000
Subject: [PATCH] Bug 35659: DBRev 24.06.00.47

Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
---
 Koha.pm                                             |  2 +-
 .../Bug-35659.pl => db_revs/240600047.pl}           | 13 +++++++------
 2 files changed, 8 insertions(+), 7 deletions(-)
 rename installer/data/mysql/{atomicupdate/Bug-35659.pl => db_revs/240600047.pl} (89%)

diff --git a/Koha.pm b/Koha.pm
index 139714650d..958b413289 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 = "24.06.00.046";
+$VERSION = "24.06.00.047";
 
 sub version {
     return $VERSION;
diff --git a/installer/data/mysql/atomicupdate/Bug-35659.pl b/installer/data/mysql/db_revs/240600047.pl
similarity index 89%
rename from installer/data/mysql/atomicupdate/Bug-35659.pl
rename to installer/data/mysql/db_revs/240600047.pl
index 39280c5c8e..44f39ee95b 100755
--- a/installer/data/mysql/atomicupdate/Bug-35659.pl
+++ b/installer/data/mysql/db_revs/240600047.pl
@@ -1,8 +1,9 @@
 use Modern::Perl;
+use Koha::Installer::Output qw(say_warning say_failure say_success say_info);
 
 return {
     bug_number  => "35659",
-    description => "OAI-PMH Harvester",
+    description => "OAI-PMH harvester",
     up          => sub {
         my ($args) = @_;
         my ( $dbh, $out ) = @$args{qw(dbh out)};
@@ -20,7 +21,7 @@ return {
             ) ENGINE=InnoDB DEFAULT CHARSET=utf8mb4 COLLATE=utf8mb4_unicode_ci;
         }
         );
-        say $out "Added new table 'oai_servers'";
+        say_success( $out, "Added new table 'oai_servers'" );
 
         $dbh->do(
             q{
@@ -55,14 +56,14 @@ return {
             ) ENGINE=InnoDB DEFAULT CHARSET=utf8mb4 COLLATE=utf8mb4_unicode_ci;
         }
         );
-        say $out "Added new tables 'import_oai_biblios' and import_oai_authorities";
+        say_success( $out, "Added new tables 'import_oai_biblios' and import_oai_authorities" );
 
         $dbh->do(
             q{
             UPDATE `permissions` SET description='Manage Z39.50 and SRU servers, OAI repositories configuration' WHERE code='manage_search_targets';
         }
         );
-        say $out "Updated manage_search_targets permission description";
+        say_success( $out, "Updated manage_search_targets permission description" );
 
         $dbh->do(
             q{
@@ -70,7 +71,7 @@ return {
             ('OAI-PMH:HarvestEmailReport','','','After an OAI-PMH harvest, send a report email to the email address','Free');
         }
         );
-        say $out "Added OAI-PMH:HarvestEmailReport system preference";
+        say_success( $out, "Added OAI-PMH:HarvestEmailReport system preference" );
 
         $dbh->do(
             q{
@@ -79,7 +80,7 @@ return {
             VALUES ('catalogue','OAI_HARVEST_REPORT','','OAI harvest report',0,'OAI harvest report for [% servername %]','OAI harvest report for [% servername %]:\n\nEndpoint: [% endpoint %]\nSet: [% set %]\nData format: [% dataformat %]\nRecord type: [% recordtype %]\n\n[% added %] records added\n[% updated %] records updated\n[% deleted %] records deleted\n[% skipped %] records skipped\n[% in_error %] records in error\n[% total %] total','email','default');
         }
         );
-        say $out "Added OAI_HARVEST_REPORT letter";
+        say_success( $out, "Added OAI_HARVEST_REPORT letter" );
 
     },
 };
-- 
2.39.5