From fbcdce5e0a00da4eb8884a7786ead92db966ad16 Mon Sep 17 00:00:00 2001 From: Martin Renvoize Date: Fri, 28 Jun 2024 16:03:03 +0100 Subject: [PATCH] Bug 37216: (QA follow-up) Add update to set existing options Signed-off-by: Martin Renvoize Signed-off-by: Katrin Fischer --- installer/data/mysql/atomicupdate/bug_37216.pl | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) create mode 100755 installer/data/mysql/atomicupdate/bug_37216.pl diff --git a/installer/data/mysql/atomicupdate/bug_37216.pl b/installer/data/mysql/atomicupdate/bug_37216.pl new file mode 100755 index 0000000000..e773122adf --- /dev/null +++ b/installer/data/mysql/atomicupdate/bug_37216.pl @@ -0,0 +1,18 @@ +use Modern::Perl; +use Koha::Installer::Output qw(say_warning say_failure say_success say_info); + +return { + bug_number => "37216", + description => "Ensure EmailFieldSelection options are correct", + up => sub { + my ($args) = @_; + my ( $dbh, $out ) = @$args{qw(dbh out)}; + + # Do you stuffs here + $dbh->do( + q{ UPDATE systempreferences SET options = 'email|emailpro|B_email' WHERE variable = 'EmailFieldSelection' } + ); + + say_success( $out, "Updated system preference 'EmailFieldSelection'" ); + }, +}; -- 2.39.5