Commit 68f96c0c authored Nov 12, 2008 by Stephen Hemminger Committed by Ingo Molnar Nov 12, 2008

tracing/fastboot: fix perlcritic warning



Impact: cleanup

Fix the following warning from the perl syntax checking tool perlcritic.
This tool is a lint like tool that checks for perl best practices.

Loop iterator is not lexical at line 113, column 1.
See page 108 of PBP.  (Severity: 5)

Signed-off-by: Stephen Hemminger <shemminger@vyatta.com>
Signed-off-by: Ingo Molnar <mingo@elte.hu>

parent cb9382e5

scripts/bootgraph.pl

+2 −2

Original line number	Diff line number	Diff line
		@@ -109,8 +109,8 @@ my $stylecounter = 0;
		my %rows;
		my $rowscount = 1;
		my @initcalls = sort { $start{$a} <=> $start{$b} } keys(%start);
		my $key;
		foreach $key (@initcalls) {

		foreach my $key (@initcalls) {
		my $duration = $end{$key} - $start{$key};

		if ($duration >= $threshold) {