Koha/installer/data/mysql/db_revs/221107001.pl
Tomas Cohen Arazi 7fc1d88641 Bug 32478: DBRev 22.11.07.001
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
(cherry picked from commit 233094521e)
Signed-off-by: Pedro Amorim <pedro.amorim@ptfs-europe.com>
2023-07-18 09:00:47 +00:00

17 lines
576 B
Perl
Executable file

use Modern::Perl;
use C4::Context;
return {
bug_number => "32478",
description => "Remove usage of Koha::Config::SysPref->find since bypasses cache",
up => sub {
my ($args) = @_;
my ($dbh, $out) = @$args{qw(dbh out)};
$dbh->do(q{UPDATE `systempreferences` SET `value` = REPLACE(`value`, 'NULL', 'null') WHERE `variable` = 'ItemsDeniedRenewal'});
say $out "Replace 'NULL' with 'null' in ItemsDeniedRenewal system preference";
C4::Context->clear_syspref_cache();
say $out "Clear system preference cache";
},
};