From 1442ed7f32c2ff77dc0fa255988955dd84c6f359 Mon Sep 17 00:00:00 2001 From: Thomas Klausner Date: Mon, 31 Mar 2025 08:41:50 +0000 Subject: [PATCH] Bug 39171: apply perltidy to atomicupdate file Signed-off-by: Thomas Klausner --- ...9_ElasticsearchMarcFormat_to_base64ISO2709.pl | 16 ++++++++++------ 1 file changed, 10 insertions(+), 6 deletions(-) diff --git a/installer/data/mysql/atomicupdate/bug_39171-rename_IS02709_ElasticsearchMarcFormat_to_base64ISO2709.pl b/installer/data/mysql/atomicupdate/bug_39171-rename_IS02709_ElasticsearchMarcFormat_to_base64ISO2709.pl index eee86af1e9..419d66f608 100755 --- a/installer/data/mysql/atomicupdate/bug_39171-rename_IS02709_ElasticsearchMarcFormat_to_base64ISO2709.pl +++ b/installer/data/mysql/atomicupdate/bug_39171-rename_IS02709_ElasticsearchMarcFormat_to_base64ISO2709.pl @@ -1,14 +1,18 @@ use Modern::Perl; return { - bug_number => "39171", + bug_number => "39171", description => "Rename ElasticsearchMARCFormat syspref options", - up => sub { + up => sub { my ($args) = @_; - my ($dbh, $out) = @$args{qw(dbh out)}; + my ( $dbh, $out ) = @$args{qw(dbh out)}; - $dbh->do(q{ UPDATE systempreferences SET options = 'base64ISO2709|ARRAY' WHERE variable = 'ElasticsearchMARCFormat' }); - $dbh->do(q{ UPDATE systempreferences SET value = 'base64ISO2709' WHERE variable = 'ElasticsearchMARCFormat' AND value = 'ISO2709' }); + $dbh->do( + q{ UPDATE systempreferences SET options = 'base64ISO2709|ARRAY' WHERE variable = 'ElasticsearchMARCFormat' } + ); + $dbh->do( + q{ UPDATE systempreferences SET value = 'base64ISO2709' WHERE variable = 'ElasticsearchMARCFormat' AND value = 'ISO2709' } + ); say $out "Renamed options for 'ElasticsearchMARCFormat' system preference"; }, -} + } -- 2.39.5