browser: support class for disabled (d)

[sheet.git] / browser.plp

diff --git a/browser.plp b/browser.plp
index c2586774810d4dfd888d09b33b8af6d314ced7ed..1b9c2d2f26cd440ebff0d3bdffb4d9f1bb5caf5d 100644 (file)
--- a/browser.plp
+++ b/browser.plp
@@ -29,6 +29,10 @@ $_->{verrelease} = {
 
 my %CSTATS = (
        'n'   => 'l1',
+       'n d' => 'l2',
+       'n x d' => 'l2 ex',
+       'p d' => 'l2',
+       'a d' => 'l2',
        'y'   => 'l5',
        'y x' => 'l5 ex',
        'a'   => 'l3',
@@ -46,6 +50,7 @@ my %DSTATS = (
        j => 'javascript required',
        a => 'partial',
        y => 'supported',
+       d => 'disabled by default',
        x => sub {
                join(' ',
                        'requires prefix',
@@ -96,7 +101,8 @@ given ($get{usage} // 'wm') {
 if ($usage) { # first() does not work inside given >:(
        # adapt version usage to actual support data
        my %engineuse;  # prefix => usage sum
-       while (my ($browser, $row) = each %$canihas) {
+       for my $browser (keys %versions) {
+               my $row = $canihas->{$browser} // {};
                my $verlist = $versions{$browser} or next;
                my %supported = map { $_ => 1 } @$verlist;
 
@@ -111,7 +117,7 @@ if ($usage) { # first() does not work inside given >:(
                }
 
                # build row list for each version
-               if ($minusage = $get{threshold} // .2) {
+               if ($minusage = $get{threshold} // .5) {
                        my @vershown;  # $verlist replacement
                        my ($rowusage, @verrow) = (0);  # replacement row tracking
                        for (@$verlist) {
@@ -398,7 +404,7 @@ sub showversions {
        <table class="glyphs"><tr>
        <td class="X l5">supported
        <td class="X l3">partial
-       <td class="X l2">external (js/plugin)
+       <td class="X l2">optional
        <td class="X l1">missing
        <td class="X l0">unknown
        <td class="X ex">prefixed