From 93312a5cb2131ed447fadea7c9d8dbdb980abfd6 Mon Sep 17 00:00:00 2001 From: Hammat Wele Date: Wed, 20 Dec 2023 15:37:58 +0000 Subject: [PATCH] Bug 33317: (follow-up) Perltidy --- installer/data/mysql/atomicupdate/bug_33317.pl | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/installer/data/mysql/atomicupdate/bug_33317.pl b/installer/data/mysql/atomicupdate/bug_33317.pl index 58858e4e27..6997f7ba76 100644 --- a/installer/data/mysql/atomicupdate/bug_33317.pl +++ b/installer/data/mysql/atomicupdate/bug_33317.pl @@ -1,14 +1,14 @@ 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'"; }, -}; \ No newline at end of file +}; -- 2.34.1