From 8c948ee349f125b6c79378a6cdbd6c1b0416a5a5 Mon Sep 17 00:00:00 2001
From: David Cook <dcook@prosentient.com.au>
Date: Fri, 26 Jul 2024 03:27:22 +0000
Subject: [PATCH] Bug 37323: Tidy

Signed-off-by: David Cook <dcook@prosentient.com.au>
Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
(cherry picked from commit 579c28c764257a250c12aa11207772c074c1335e)
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
---
 tools/picture-upload.pl | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/tools/picture-upload.pl b/tools/picture-upload.pl
index f5e579a691..71d3a26944 100755
--- a/tools/picture-upload.pl
+++ b/tools/picture-upload.pl
@@ -215,11 +215,11 @@ sub handle_dir {
         my $dir_h;
         opendir $dir_h, $dir;
         while ( my $filename = readdir $dir_h ) {
-
-              if ( ($filename =~ m/datalink\.txt/i
-                || $filename =~ m/idlink\.txt/i ) && ( -e "$dir/$filename" && !-l "$dir/$filename")) {
-                  $file = Cwd::abs_path("$dir/$filename");
-              }
+            if (   ( $filename =~ m/datalink\.txt/i || $filename =~ m/idlink\.txt/i )
+                && ( -e "$dir/$filename" && !-l "$dir/$filename" ) )
+            {
+                $file = Cwd::abs_path("$dir/$filename");
+            }
         }
         my $fh;
         unless ( open( $fh, '<', $file ) ) {
-- 
2.39.5