diff --git a/Koha.pm b/Koha.pm index 7e506980fc..25a85b10c5 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.11.10.001"; +$VERSION = "23.11.10.002"; sub version { return $VERSION; diff --git a/installer/data/mysql/atomicupdate/bug_37954.pl b/installer/data/mysql/db_revs/231110002.pl similarity index 84% rename from installer/data/mysql/atomicupdate/bug_37954.pl rename to installer/data/mysql/db_revs/231110002.pl index 1c75e5b3ed..0a70872b9e 100755 --- a/installer/data/mysql/atomicupdate/bug_37954.pl +++ b/installer/data/mysql/db_revs/231110002.pl @@ -1,5 +1,4 @@ use Modern::Perl; -use Koha::Installer::Output qw(say_warning say_failure say_success say_info); return { bug_number => "37954", @@ -14,7 +13,7 @@ return { } ); if ($existing_holdings_barcode_setting) { - say_info( $out, "Settings already exist" ); + say $out "Settings already exist"; } else { my ( $cannot_be_toggled, $is_hidden ) = $dbh->selectrow_array( q{ @@ -29,9 +28,9 @@ return { ('catalogue', 'detail', 'holdings_table', 'holdings_barcode', $cannot_be_toggled, $is_hidden ) } ); - say_success( $out, "Settings moved to holdings_barcode" ); + say $out "Settings moved to holdings_barcode"; } else { - say_info( $out, "No settings for holdings_barcodes found" ); + say $out "No settings for holdings_barcodes found"; } } $dbh->do(