# HG changeset patch # User Matti Hamalainen # Date 1440041260 -10800 # Node ID 62687fee6f1cf2e26b0baa792a939d29d0021e1f # Parent a84b40bc2a9959db20765a38bbfdcc2ac37b468f Cosmetic. diff -r a84b40bc2a99 -r 62687fee6f1c parsedata.pl --- a/parsedata.pl Mon Aug 17 22:02:22 2015 +0300 +++ b/parsedata.pl Thu Aug 20 06:27:40 2015 +0300 @@ -431,7 +431,8 @@ } # Skip zero position this way (can't use foreach here) -for (my $i = 1; $i < scalar(@{$q}); $i++) { +for (my $i = 1; $i < scalar(@{$q}); $i++) +{ my $d = $$q[$i]{"nodes"}; if (defined($d)) {