From: Mischa POSLAWSKY <perl@shiar.org>
Date: Sun, 5 Dec 2010 18:05:24 +0000 (+0100)
Subject: browser: new browsers, optional
X-Git-Tag: v1.4~79
X-Git-Url: http://git.shiar.nl/sheet.git/commitdiff_plain/fe2afa53dfb9a89386d31bd3fd80f4bfdfa16030?hp=9cfdae85d5584a9b0812b31ec77b60fcbc57d977

browser: new browsers, optional
---

diff --git a/browser.plp b/browser.plp
index ce56bdb..a4af534 100644
--- a/browser.plp
+++ b/browser.plp
@@ -43,13 +43,14 @@ my %CSTATUS = (
 	rec   => 'l6', # recommendation
 	ietf  => 'l6', # standard
 );
-my @browsers = qw(trident gecko webkit_saf webkit_chr presto);
 my %versions;
 if (my ($somerow) = values %{ $caniuse->{data} }) {
 	while (my ($browser, $row) = each %{ $somerow->{stats} }) {
 		$versions{$browser} = [ sort { paddedver($a) cmp paddedver($b) } keys %$row ];
 	}
 }
+my @browsers = grep { $versions{$_} }
+	qw(trident gecko webkit_saf ios_saf webkit_chr android presto op_mob op_mini);
 
 my $canihas = do 'browser-usage.inc.pl' || do {
 	printf "<p>Browser usage data not found: <em>%s</em>.</p>\n", $_