This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Temporarily uncuddle the 'else's
authorJames E Keenan <jkeenan@cpan.org>
Tue, 23 Feb 2021 14:02:03 +0000 (09:02 -0500)
committerJames E Keenan <jkeenan@cpan.org>
Sun, 28 Feb 2021 14:07:10 +0000 (09:07 -0500)
ext/Pod-Html/t/pod2html-lib.pl

index 9c531cc..8725b0a 100644 (file)
@@ -62,8 +62,7 @@ sub convert_n_test {
         for my $sw (keys %{$p2h_args_ref}) {
             if ($no_arg_switches{$sw}) {
                 $args_table{$sw} = undef;
-            }
-            else {
+            } else {
                 $args_table{$sw} = $p2h_args_ref->{$sw};
             }
         }
@@ -72,8 +71,7 @@ sub convert_n_test {
     for my $k (keys %args_table) {
         if (defined $args_table{$k}) {
             push @args_list, "--" . $k . "=" . $args_table{$k};
-        }
-        else {
+        } else {
             push @args_list, "--" . $k;
         }
     }