- From: Ville Skytta via cvs-syncmail <cvsmail@w3.org>
- Date: Wed, 25 Nov 2009 20:21:38 +0000
- To: www-validator-cvs@w3.org
Update of /sources/public/validator/httpd/cgi-bin
In directory hutz:/tmp/cvs-serv30228/httpd/cgi-bin
Modified Files:
check
Log Message:
Fix use of map in void context flagged by perlcritic.
Index: check
===================================================================
RCS file: /sources/public/validator/httpd/cgi-bin/check,v
retrieving revision 1.732
retrieving revision 1.733
diff -u -d -r1.732 -r1.733
--- check 25 Nov 2009 19:52:47 -0000 1.732
+++ check 25 Nov 2009 20:21:36 -0000 1.733
@@ -170,10 +170,10 @@
}
{ # Make types config indexed by FPI.
- my $_types = {};
- map { $_types->{$CFG->{Types}->{$_}->{PubID}} = $CFG->{Types}->{$_} }
- keys %{$CFG->{Types}};
- $CFG->{Types} = $_types;
+ my $types = {};
+ $types->{$CFG->{Types}->{$_}->{PubID}} = $CFG->{Types}->{$_}
+ for keys(%{$CFG->{Types}});
+ $CFG->{Types} = $types;
}
#
Received on Wednesday, 25 November 2009 20:21:47 UTC