From db6e2b4c52ade524f3db419d75084728e96e1f9c Mon Sep 17 00:00:00 2001
From: Tom Lane <tgl@sss.pgh.pa.us>
Date: Wed, 22 May 2019 13:36:19 -0400
Subject: Initial pgperltidy run for v12.

Make all the perl code look nice, too (for some value of "nice").
---
 src/test/perl/TestLib.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/test/perl/TestLib.pm')

diff --git a/src/test/perl/TestLib.pm b/src/test/perl/TestLib.pm
index a164cdbd8ca..f8eb7058a61 100644
--- a/src/test/perl/TestLib.pm
+++ b/src/test/perl/TestLib.pm
@@ -288,7 +288,7 @@ sub check_mode_recursive
 				unless (defined($file_stat))
 				{
 					my $is_ENOENT = $!{ENOENT};
-					my $msg = "unable to stat $File::Find::name: $!";
+					my $msg       = "unable to stat $File::Find::name: $!";
 					if ($is_ENOENT)
 					{
 						warn $msg;
-- 
cgit v1.2.3