X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/d599bf88168445b86180be157dea66e1e040813a..bac45e06a93a0aa666c6dfa3e312684f161e3952:/browser.plp
diff --git a/browser.plp b/browser.plp
index 2acb027..d6291cb 100644
--- a/browser.plp
+++ b/browser.plp
@@ -42,6 +42,10 @@ given ($get{usage} // 'wm') {
<:
my $caniuse = do 'browser-support.inc.pl' or die $! || $@;
+$_->{verrelease} = {
+ # mark last two (future) versions as unreleased, ensure current isn't
+ map { $_->[-1] => 0, $_->[-2] => 0, $_->[-3] => undef } $_->{versions}
+} for values %{ $caniuse->{agents} };
my %CSTATS = (
'n' => 'l1',
@@ -113,8 +117,12 @@ print '', $header;
print "\n";
print '' x 3;
for my $browser (@browsers) {
- printf(' | %s',
- $canihas->{$browser}->{$_}, showversions($_),
+ printf(' | %s',
+ $canihas->{$browser}->{$_},
+ (map {
+ defined $_ && !$_ && ' class="ex"'
+ } $caniuse->{agents}->{$browser}->{verrelease}->{$_}),
+ showversions($_),
) for @{ $versions{$browser} };
}
print ' | ' x 1;
|