Ungroup to make future tlds.h patches smaller
authorRicardo Mones <ricardo@mones.org>
Mon, 23 Nov 2015 19:27:58 +0000 (20:27 +0100)
committerRicardo Mones <ricardo@mones.org>
Mon, 23 Nov 2015 19:27:58 +0000 (20:27 +0100)
Future starting after the next oneā€¦ ;-)

tools/claws.get.tlds.pl

index 0ae3990..bea3245 100755 (executable)
@@ -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