W3C home > Mailing lists > Public > www-validator-cvs@w3.org > November 2009

validator/httpd/cgi-bin check,1.732,1.733

From: Ville Skytta via cvs-syncmail <cvsmail@w3.org>
Date: Wed, 25 Nov 2009 20:21:38 +0000
To: www-validator-cvs@w3.org
Message-Id: <E1NDOMs-0007rq-P5@lionel-hutz.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

This archive was generated by hypermail 2.3.1 : Wednesday, 7 January 2015 15:17:40 UTC