Ungroup to make future tlds.h patches smaller

Future starting after the next one… ;-)
This commit is contained in:
Ricardo Mones 2015-11-23 20:27:58 +01:00
parent 8b99c246a1
commit 89025943db
1 changed files with 2 additions and 3 deletions

View File

@ -60,9 +60,8 @@ foreach (@lines) {
next if (/^XN--.*$/); # IDNs not supported yet, see bug #1670
my $tld = lc $_; # list comes in upper case
print "\"$tld\""; ++$j;
print "," unless $i >= scalar @lines;
print "" . ($j % 5 == 0 or $i >= scalar @lines)? "\n": " ";
print "\t" if ($j % 5 == 0 and $i < scalar @lines);
print ",\n\t" unless $i >= scalar @lines;
print "\n" if $i >= scalar @lines;
}
print "};\n\n"; # close array