Bug 30403: (QA follow-up) Fix up atomic update

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
This commit is contained in:
Kyle Hall 2022-12-16 09:22:41 -05:00 committed by Tomas Cohen Arazi
parent d320d98a2e
commit 999a890aad
Signed by: tomascohen
GPG key ID: 0A272EA1B2F3C15F

View file

@ -2,13 +2,11 @@ use Modern::Perl;
return {
bug_number => "30403",
description => "A single line description",
description => "Add system preference UpdateNotForLoanStatusOnCheckin",
up => sub {
my ($args) = @_;
my ($dbh, $out) = @$args{qw(dbh out)};
# Do you stuffs here
$dbh->do(q{INSERT IGNORE INTO systempreferences ( variable, value, options, explanation, type ) VALUES ('UpdateNotForLoanStatusOnCheckin', '', 'NULL', 'This is a list of value pairs. When an item is checked in, if the not for loan value on the left matches the items not for loan value it will be updated to the right-hand value. E.g. ''-1: 0'' will cause an item that was set to ''Ordered'' to now be available for loan. Each pair of values should be on a separate line.', 'Free')});
# Print useful stuff here
say $out "Update is going well so far";
},
};