X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/8733f2c8d3a9544baf347ecd42188779794aad92..81f63c446be472807c37b97ce6c6cd675bd198c6:/browser.plp diff --git a/browser.plp b/browser.plp index effda37..c24df9e 100644 --- a/browser.plp +++ b/browser.plp @@ -389,7 +389,12 @@ sub saybrowsercols { || 'u' # unsure ); unless (!defined $prev or $prev ~~ $compare) { - my $usage = sum(@{ $canihas->{$browser} }{ map { @{$_} } @span }); + my @vercover = (map { @{$_} } @span); + for ($ver ? @{$ver} : ()) { + $data->{$_} eq $data->{$vercover[-1]} or last; + push @vercover, $_; # matches from next span start + } + my $usage = sum(@{ $canihas->{$browser} }{@vercover}); # strip #\d note references from support class my @notes; @@ -398,13 +403,13 @@ sub saybrowsercols { # prepare version hover details my $title = sprintf('%.1f%% %s', $usage * $usagepct, join(' ', - (map { ref $_ eq 'CODE' ? $_->($browser, $span[0]->[0]) : $_ } + (map { ref $_ eq 'CODE' ? $_->($browser, $vercover[0]) : $_ } map { $DSTATS{$_} // () } map { split / /, $_ } $prev ), 'in', $caniuse->{agents}->{$browser}->{abbr}, - showversions((map { @{$_} } @span), undef), + showversions(@vercover, undef), )); $title .= "\n$_" for notestotitle(@notes);