gitweb: Use block form of map/grep in a few cases more

[Gitweb] / gitweb.perl

diff --git a/gitweb.perl b/gitweb.perl
index 9f0e84e04b12e1a67599bb363cc3988bca3bfc12c5161441d98613e94df6841e..cb821b5b963b391db4dcfce5927fd6863df1eebceed15b9d0926ff70fdd95960 100755 (executable)
--- a/gitweb.perl
+++ b/gitweb.perl
@@ -459,8 +459,8 @@ sub filter_snapshot_fmts {
        @fmts = map {
                exists $known_snapshot_format_aliases{$_} ?
                       $known_snapshot_format_aliases{$_} : $_} @fmts;
-       @fmts = grep(exists $known_snapshot_formats{$_}, @fmts);
-
+       @fmts = grep {
+               exists $known_snapshot_formats{$_} } @fmts;
 }
 
 our $GITWEB_CONFIG = $ENV{'GITWEB_CONFIG'} || "++GITWEB_CONFIG++";
@@ -1839,7 +1839,7 @@ sub git_cmd {
 # Try to avoid using this function wherever possible.
 sub quote_command {
        return join(' ',
-                   map( { my $a = $_; $a =~ s/(['!])/'\\$1'/g; "'$a'" } @_ ));
+               map { my $a = $_; $a =~ s/(['!])/'\\$1'/g; "'$a'" } @_ );
 }
 
 # get HEAD ref of given project as hash