From f6eb43ed13d3138c4cbde6bbdc2e17fd583aefa9 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Dagfinn=20Ilmari=20Manns=C3=A5ker?= Date: Tue, 21 Jan 2025 00:54:37 +0000 Subject: [PATCH] Run pgperltidy with Perl::Tidy-20250105 --- src/test/perl/PostgreSQL/Test/Cluster.pm | 10 ++++------ 1 file changed, 4 insertions(+), 6 deletions(-) diff --git a/src/test/perl/PostgreSQL/Test/Cluster.pm b/src/test/perl/PostgreSQL/Test/Cluster.pm index f521ad0b12f..fbddc85c554 100644 --- a/src/test/perl/PostgreSQL/Test/Cluster.pm +++ b/src/test/perl/PostgreSQL/Test/Cluster.pm @@ -1826,8 +1826,8 @@ sub get_free_port { foreach my $addr (qw(127.0.0.1), ($use_tcp && $PostgreSQL::Test::Utils::windows_os) - ? qw(127.0.0.2 127.0.0.3 0.0.0.0) - : ()) + ? qw(127.0.0.2 127.0.0.3 0.0.0.0) + : ()) { if (!can_bind($addr, $port)) { @@ -3738,8 +3738,7 @@ sub advance_wal ########################################################################## -package PostgreSQL::Test::Cluster::V_11 - ; ## no critic (ProhibitMultiplePackages) +package PostgreSQL::Test::Cluster::V_11; ## no critic (ProhibitMultiplePackages) use parent -norequire, qw(PostgreSQL::Test::Cluster); @@ -3766,8 +3765,7 @@ sub init ########################################################################## -package PostgreSQL::Test::Cluster::V_10 - ; ## no critic (ProhibitMultiplePackages) +package PostgreSQL::Test::Cluster::V_10; ## no critic (ProhibitMultiplePackages) use parent -norequire, qw(PostgreSQL::Test::Cluster::V_11); -- 2.39.5