From d2d2e7d9f29e1a28d320a236b174beddb2d43126 Mon Sep 17 00:00:00 2001 From: Lucas Gass Date: Wed, 10 Jan 2024 21:18:14 +0000 Subject: [PATCH] Bug 33259: (follow-up) perltidy Signed-off-by: Lucas Gass Signed-off-by: Martin Renvoize --- .../bug_33259-add_SameSiteSessionCookie_syspref.pl | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/installer/data/mysql/atomicupdate/bug_33259-add_SameSiteSessionCookie_syspref.pl b/installer/data/mysql/atomicupdate/bug_33259-add_SameSiteSessionCookie_syspref.pl index 9c5933aab63..91017d980b3 100755 --- a/installer/data/mysql/atomicupdate/bug_33259-add_SameSiteSessionCookie_syspref.pl +++ b/installer/data/mysql/atomicupdate/bug_33259-add_SameSiteSessionCookie_syspref.pl @@ -1,13 +1,15 @@ use Modern::Perl; return { - bug_number => "33259", + bug_number => "33259", description => "Bug 33259: Optionally set SameSite attribute of cookie to Strict", - 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 ('SameSiteSessionCookie', 'Lax', 'None|Lax|Strict', 'If Strict, then the SameSite attribute of the session cookie will be set to Strict, rather than the default Lax. None means you want the cookie sent iun a third-party context.', 'Choice') }); + $dbh->do( + q{INSERT IGNORE INTO systempreferences (variable,value,options,explanation,type) VALUES ('SameSiteSessionCookie', 'Lax', 'None|Lax|Strict', 'If Strict, then the SameSite attribute of the session cookie will be set to Strict, rather than the default Lax. None means you want the cookie sent iun a third-party context.', 'Choice') } + ); say $out "Added new system preference 'SameSiteSessionCookie'"; }, -- 2.30.2