diff --git a/util/dofile.pl b/util/dofile.pl index 74d1520ed0f67063510948ba432fc2563bb60188..617c09ce6562cbee56a04cc8ea1c4b17bcca085e 100644 --- a/util/dofile.pl +++ b/util/dofile.pl @@ -83,7 +83,7 @@ sub broken { my $prev_linecount = 0; my $text = @ARGV - ? join("", map { my $x = my $y = Text::Template::_load_text($_); + ? join("", map { my $x = Text::Template::_load_text($_); my $linecount = $x =~ tr/\n//; $prev_linecount = ($linecount += $prev_linecount); $lines{$linecount} = $_;