From: Mischa POSLAWSKY <perl@shiar.org>
Date: Wed, 26 Apr 2017 21:20:40 +0000 (+0200)
Subject: browser: delete unused data from caniuse include
X-Git-Tag: v1.10~66
X-Git-Url: http://git.shiar.nl/sheet.git/commitdiff_plain/1b0af87f59dd51100f2d19d152dd063777563cac

browser: delete unused data from caniuse include
---

diff --git a/tools/mkcaniuse b/tools/mkcaniuse
index 07531d4..57b36fc 100755
--- a/tools/mkcaniuse
+++ b/tools/mkcaniuse
@@ -19,6 +19,14 @@ my $data = decode_json($source);
 my $update = eval { stat(${^LAST_FH} // $ARGV)->mtime }
 	or warn "Could not determine input time\n";
 $data->{-date} = Time::Piece->new($update)->datetime;
+delete $data->{eras};
+for (values %{ $data->{data} }) {
+	delete @{$_}{qw[ usage_perc_a usage_perc_y ]};
+}
+for (values %{ $data->{agents} }) {
+	delete $_->{usage_global};
+	shift @{ $_->{versions} } while !defined $_->{versions}->[0];
+}
 
 say "# automatically generated by $0";
 print '+', pp($data);