Remove extra unused variable in util/dofile.pl

Reviewed-by: Rich Salz <rsalz@openssl.org>
This commit is contained in:
Richard Levitte
2016-01-23 12:35:30 +01:00
parent de42e71701
commit bcfa685ecc

View File

@@ -83,7 +83,7 @@ sub broken {
my $prev_linecount = 0; my $prev_linecount = 0;
my $text = my $text =
@ARGV @ARGV
? join("", map { my $x = my $y = Text::Template::_load_text($_); ? join("", map { my $x = Text::Template::_load_text($_);
my $linecount = $x =~ tr/\n//; my $linecount = $x =~ tr/\n//;
$prev_linecount = ($linecount += $prev_linecount); $prev_linecount = ($linecount += $prev_linecount);
$lines{$linecount} = $_; $lines{$linecount} = $_;