Bug 35169: add bug_35169.pl for DB

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
This commit is contained in:
Matthias Le Gac 2024-02-22 15:33:25 -05:00 committed by Katrin Fischer
parent 7c9a7fe7ff
commit 41d2473198
No known key found for this signature in database
GPG Key ID: 0EF6E2C03357A834
2 changed files with 23 additions and 1 deletions

View File

@ -0,0 +1,23 @@
use Modern::Perl;
return {
bug_number => "35169",
description => "Add new system preferences for longoverdue.pl borrowers categories",
up => sub {
my ($args) = @_;
my ( $dbh, $out ) = @$args{qw(dbh out)};
# Do you stuffs here
$dbh->do(
q{
INSERT INTO systempreferences (variable, value, options, explanation, type) VALUES
('DefaultLongOverdueBorrowerCategories', '', NULL, NULL, NULL),
('DefaultLongOverdueSkipBorrowerCategories', '', NULL, NULL, NULL);
}
);
# sysprefs
say $out "Added new system preference 'DefaultLongOverdueBorrowerCategories'";
say $out "Added new system preference 'DefaultLongOverdueSkipBorrowerCategories'";
},
};

View File

@ -459,7 +459,6 @@ Circulation:
- <br>WARNING — This preference will be active only if DefaultLongOverdueSkipBorrowerCategories is empty.
- "<br><strong>NOTE:</strong> This system preference requires the <code>misc/cronjobs/longoverdue.pl</code> cronjob. Ask your system administrator to schedule it."
-
- pref: DefaultLongOverdueSkipBorrowerCategories
choices: patron-categories