Re: [PATCH v2 2/3] gitweb/gitweb.perl: remove use of qw(...) as parentheses

[Jakub Narebski <jnareb@xxxxxxxxx>]

Jakub Narebski wrote:
> On Sat, 19 Feb 2011, Ãvar ArnfjÃrà Bjarmason wrote:

> [...]
> > --- a/gitweb/gitweb.perl
> > +++ b/gitweb/gitweb.perl
> > @@ -3501,7 +3501,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',

Ah, sorry, if Perl reqyures to use 'foreach (@array)', then
of course one should use 'forach (qw(A B))'.

-- 
Jakub Narebski
Poland
--
To unsubscribe from this list: send the line "unsubscribe git" in
the body of a message to majordomo@xxxxxxxxxxxxxxx
More majordomo info at  http://vger.kernel.org/majordomo-info.html