X-Git-Url: https://git.ladys.computer/Gitweb/blobdiff_plain/959a6b60d7705c6d3ccd930c4b7b1ba8e5aa47ee6de2a99a82904d35afec6b89..380041003dbbb664fea83ed8a63c2f073e4f01dda3e512f26115a01b09db26aa:/gitweb.perl diff --git a/gitweb.perl b/gitweb.perl index 9a10274..ccb06cd 100755 --- a/gitweb.perl +++ b/gitweb.perl @@ -3502,7 +3502,7 @@ sub print_feed_meta { $href_params{'-title'} = 'log'; } - foreach my $format qw(RSS Atom) { + foreach my $format (qw(RSS Atom)) { my $type = lc($format); my %link_attr = ( '-rel' => 'alternate', @@ -3683,7 +3683,7 @@ sub git_footer_html { } $href_params{'-title'} ||= 'log'; - foreach my $format qw(RSS Atom) { + foreach my $format (qw(RSS Atom)) { $href_params{'action'} = lc($format); print $cgi->a({-href => href(%href_params), -title => "$href_params{'-title'} $format feed", @@ -4413,7 +4413,7 @@ sub git_difftree_body { } if ($diff->{'from_mode'} ne ('0' x 6)) { $from_mode_oct = oct $diff->{'from_mode'}; - if (S_ISREG($to_mode_oct)) { # only for regular file + if (S_ISREG($from_mode_oct)) { # only for regular file $from_mode_str = sprintf("%04o", $from_mode_oct & 0777); # permission bits } $from_file_type = file_type($diff->{'from_mode'});