Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 26831: (follow-up) Tidy code for qa script

Browse source 
Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
(cherry picked from commit 2f26de8746)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
This commit is contained in:
Kyle Hall 2023-11-17 17:25:58 +00:00 committed by Fridolin Somers
parent 1cfea1917a
commit aef2b3f97e
1 changed files with 6 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
installer/data/mysql/atomicupdate/bug_26831-add_PurgeListShareInvitesOlderThan_syspref.pl
View file

@ -1,12 +1,14 @@
use Modern::Perl;
return {
bug_number => "26831",
bug_number => "26831",
description => "Add new system preference PurgeListShareInvitesOlderThan",
up => sub {
up => sub {
my ($args) = @_;
my ($dbh, $out) = @$args{qw(dbh out)};
my ( $dbh, $out ) = @$args{qw(dbh out)};
$dbh->do(q{INSERT IGNORE INTO systempreferences (variable,value,options,explanation,type) VALUES ('PurgeListShareInvitesOlderThan', '14', NULL, 'If not empty, number of days used when deleting unaccepted list share invites', 'Integer') });
$dbh->do(
q{INSERT IGNORE INTO systempreferences (variable,value,options,explanation,type) VALUES ('PurgeListShareInvitesOlderThan', '14', NULL, 'If not empty, number of days used when deleting unaccepted list share invites', 'Integer') }
);
},
};