From e58d73f5c0fea33328ce18e98072e33835ad9ad3 Mon Sep 17 00:00:00 2001 From: Hammat Wele Date: Wed, 20 Dec 2023 15:27:07 +0000 Subject: [PATCH] Bug 33317: (follow-up) Perltidy --- installer/data/mysql/atomicupdate/bug_33317.pl | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/installer/data/mysql/atomicupdate/bug_33317.pl b/installer/data/mysql/atomicupdate/bug_33317.pl index 58858e4e27..4f375d89bb 100644 --- a/installer/data/mysql/atomicupdate/bug_33317.pl +++ b/installer/data/mysql/atomicupdate/bug_33317.pl @@ -1,13 +1,13 @@ use Modern::Perl; return { - bug_number => "33317", + bug_number => "33317", description => "Add new system preference OpacMetaRobots", - 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 ('OpacMetaRobots','','','Improve search engine crawling.', 'Multiple') }); + $dbh->do(q{INSERT IGNORE INTO systempreferences (variable,value,options,explanation,type) VALUES ('OpacMetaRobots','','','Improve search engine crawling.', 'Multiple')}); say $out "Added system preference 'OpacMetaRobots'"; }, -- 2.34.1