no bug - reformat all the code using the new perltidy rules

1 files changed, 17 insertions, 15 deletions

diff --git a/scripts/update_localconfig.pl b/scripts/update_localconfig.pl
index ca3329022..8ced925d5 100755
--- a/scripts/update_localconfig.pl
+++ b/scripts/update_localconfig.pl
@@ -21,25 +21,27 @@ use File::Slurp;
 
 Bugzilla->usage_mode(USAGE_MODE_CMDLINE);
 
-my $localconfig =  Bugzilla::Install::Localconfig::read_localconfig();
+my $localconfig = Bugzilla::Install::Localconfig::read_localconfig();
 
 my ($param_name, $param_value) = @ARGV;
 die "Syntax: $0 param_name param_value\n" unless defined($param_value);
-die "Invalid param name: $param_name\n" unless exists $localconfig->{$param_name};
+die "Invalid param name: $param_name\n"
+  unless exists $localconfig->{$param_name};
 
 if ($localconfig->{$param_name} ne $param_value) {
-    my @file = read_file('localconfig');
-    my $updated = 0;
-    foreach my $line (@file) {
-        next unless $line =~ /^\s*\$([\w_]+)\s*=\s*'([^']*)'/;
-        my ($name, $value) = ($1, $2);
-        if ($name eq $param_name && $value ne $param_value) {
-            print "setting '$name' to '$param_value'\n";
-            $line = "\$$name = '$param_value';\n";
-            $updated = 1;
-        }
+  my @file    = read_file('localconfig');
+  my $updated = 0;
+  foreach my $line (@file) {
+    next unless $line =~ /^\s*\$([\w_]+)\s*=\s*'([^']*)'/;
+    my ($name, $value) = ($1, $2);
+    if ($name eq $param_name && $value ne $param_value) {
+      print "setting '$name' to '$param_value'\n";
+      $line    = "\$$name = '$param_value';\n";
+      $updated = 1;
     }
-    write_file('localconfig', @file) if $updated;
-} else {
-    print "'$param_name' is already '$param_value'\n";
+  }
+  write_file('localconfig', @file) if $updated;
+}
+else {
+  print "'$param_name' is already '$param_value'\n";
 }