From e9fb7389554db9191eb52ec0691163327a731c98 Mon Sep 17 00:00:00 2001
From: Kyle M Hall <kyle@bywatersolutions.com>
Date: Mon, 18 Mar 2024 07:04:23 -0400
Subject: [PATCH] Bug 34621: Tidy import_patrons.pl
Content-Type: text/plain; charset=utf-8

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
---
 misc/import_patrons.pl | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/misc/import_patrons.pl b/misc/import_patrons.pl
index 964b2a1ce9..5d702d8f6f 100755
--- a/misc/import_patrons.pl
+++ b/misc/import_patrons.pl
@@ -35,7 +35,7 @@ my $welcome_new = 0;
 my %defaults;
 my $ext_preserve = 0;
 my $confirm;
-my $verbose      = 0;
+my $verbose = 0;
 my $help;
 my @preserve_fields;
 my $update_dateexpiry;
@@ -61,9 +61,9 @@ GetOptions(
     'h|help|?'                       => \$help,
 ) or pod2usage(2);
 
-pod2usage(1) if $help;
+pod2usage(1)                                       if $help;
 pod2usage(q|--ee and --et are mutually exclusive|) if $update_dateexpiry_from_today && $update_dateexpiry_from_existing;
-pod2usage(q|--file is required|) unless $csv_file;
+pod2usage(q|--file is required|)       unless $csv_file;
 pod2usage(q|--matchpoint is required|) unless $matchpoint;
 
 if ($confirm) {
@@ -111,14 +111,14 @@ if ($verbose) {
     say q{};
 }
 
-if ($verbose > 1 ) {
+if ( $verbose > 1 ) {
     say "Errors:";
-    say Data::Dumper::Dumper( $errors );
+    say Data::Dumper::Dumper($errors);
 }
 
-if ($verbose > 2 ) {
+if ( $verbose > 2 ) {
     say "Feedback:";
-    say Data::Dumper::Dumper( $feedback );
+    say Data::Dumper::Dumper($feedback);
 }
 
 my $info =
-- 
2.30.2