From f3978e5b1cbd9ef8f84f29da2d47cc30e6cb9875 Mon Sep 17 00:00:00 2001 From: Marcel de Rooy Date: Thu, 11 Dec 2025 16:27:01 +0100 Subject: [PATCH] Bug 40435: Database revision Test plan: [1] Run install or upgrade (updatedatabase.pl). Verify that pref was added to database. * perl -MC4::Context -e'print C4::Context->preference('FutureHoldsBlockRenewals'),"\n"' * You should see a zero printed. Signed-off-by: Marcel de Rooy Signed-off-by: Nick Clemens Signed-off-by: Martin Renvoize Signed-off-by: Lucas Gass --- installer/data/mysql/atomicupdate/bug_40435.pl | 18 ++++++++++++++++++ installer/data/mysql/mandatory/sysprefs.sql | 1 + 2 files changed, 19 insertions(+) create mode 100755 installer/data/mysql/atomicupdate/bug_40435.pl diff --git a/installer/data/mysql/atomicupdate/bug_40435.pl b/installer/data/mysql/atomicupdate/bug_40435.pl new file mode 100755 index 0000000000..968736acc5 --- /dev/null +++ b/installer/data/mysql/atomicupdate/bug_40435.pl @@ -0,0 +1,18 @@ +use Modern::Perl; +use Koha::Installer::Output qw(say_warning say_success say_info); + +return { + bug_number => 40435, + description => "Add preference FutureHoldsBlockRenewals", + up => sub { + my ($args) = @_; + my ( $dbh, $out ) = @$args{qw(dbh out)}; + + $dbh->do( + q{INSERT IGNORE INTO systempreferences (variable,value,options,explanation,type) + VALUES ('FutureHoldsBlockRenewals', 0, NULL, 'Allow future holds to block renewals', 'Integer' )} + ); + + say $out "Added new system preference 'FutureHoldsBlockRenewals'"; + }, +}; diff --git a/installer/data/mysql/mandatory/sysprefs.sql b/installer/data/mysql/mandatory/sysprefs.sql index 840d805906..9c4efd8c55 100644 --- a/installer/data/mysql/mandatory/sysprefs.sql +++ b/installer/data/mysql/mandatory/sysprefs.sql @@ -299,6 +299,7 @@ INSERT INTO systempreferences ( `variable`, `value`, `options`, `explanation`, ` ('ForceLibrarySelection','0',NULL,'Force staff to select a library when logging into the staff interface.','YesNo'), ('ForcePasswordResetWhenSetByStaff','0',NULL,'Force a staff created patron account to reset its password after its first OPAC login.','YesNo'), ('FRBRizeEditions','0','','If ON, Koha will query one or more ISBN web services for associated ISBNs and display an Editions tab on the details pages','YesNo'), +('FutureHoldsBlockRenewals', 0, NULL, 'Allow future holds to block renewals', 'Integer' ), ('GenerateAuthorityField667', 'Machine generated authority record', NULL, 'When BiblioAddsAuthorities and AutoCreateAuthorities are enabled, use this as a default value for the 667$a field of MARC21 records', 'free'), ('GenerateAuthorityField670', 'Work cat.', NULL, 'When BiblioAddsAuthorities and AutoCreateAuthorities are enabled, use this as a default value for the 670$a field of MARC21 records', 'free'), ('GoogleJackets','0',NULL,'if ON, displays jacket covers from Google Books API','YesNo'),