From: Nicholas Clark Date: Sat, 1 May 2010 20:34:11 +0000 (+0100) Subject: Remove the lexical $len and associated calculation, which is never used. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f5d41823bbea2258a17f2f1d1cb3518b46ab3562;p=p5sagit%2Fp5-mst-13.2.git Remove the lexical $len and associated calculation, which is never used. --- diff --git a/ext/Errno/Errno_pm.PL b/ext/Errno/Errno_pm.PL index 124b8fc..e63a667 100644 --- a/ext/Errno/Errno_pm.PL +++ b/ext/Errno/Errno_pm.PL @@ -2,7 +2,7 @@ use ExtUtils::MakeMaker; use Config; use strict; -our $VERSION = "1.11"; +our $VERSION = "1.12"; my %err = (); my %wsa = (); @@ -354,9 +354,7 @@ use strict; EDQ - my $len = 0; my @err = sort { $err{$a} <=> $err{$b} } keys %err; - map { $len = length if length > $len } @err; my $j = "\@EXPORT_OK = qw(" . join(" ",keys %err) . ");\n"; $j =~ s/(.{50,70})\s/$1\n\t/g;