From 1b0af87f59dd51100f2d19d152dd063777563cac Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Wed, 26 Apr 2017 23:20:40 +0200
Subject: [PATCH] browser: delete unused data from caniuse include

---
 tools/mkcaniuse | 8 ++++++++
 1 file changed, 8 insertions(+)

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);
-- 
2.30.0