From: Mischa POSLAWSKY <perl@shiar.org>
Date: Sat, 7 Mar 2015 22:59:22 +0000 (+0100)
Subject: font: mkfontinfo: strip whitespace from support arrays
X-Git-Tag: v1.7~32
X-Git-Url: http://git.shiar.nl/sheet.git/commitdiff_plain/61b2b5fe396c3f1c47a926cd50eb50d60415d415

font: mkfontinfo: strip whitespace from support arrays

Reduces file size from 1_064_830 to 197_514 bytes.
---

diff --git a/tools/mkfontinfo b/tools/mkfontinfo
index 12c53a5..dc8ddd6 100755
--- a/tools/mkfontinfo
+++ b/tools/mkfontinfo
@@ -124,7 +124,9 @@ $charlist{osdefault} = [qw( win95 win8 mac10 oss android )];
 
 say "# automatically generated by $0";
 say 'use utf8;';
-say '+'.pp(\%charlist);
+say '+', pp(\%charlist) =~ s{
+	( \[ \s* \d [^]]* ) ,\s*  # arrays of numbers, excluding trailing comma
+}{ $1 =~ s/\s+//gr }msxgre;  # strip whitespace
 
 __END__