X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/0717d6cc5980a7fed67caf8aa227b9bff003b47b..0b7c0c10cebb4a8be61e88a3b1d62bdd638d77c0:/browser.plp

diff --git a/browser.plp b/browser.plp
index 863f806..2776a5b 100644
--- a/browser.plp
+++ b/browser.plp
@@ -265,14 +265,23 @@ sub saystatuscol {
 sub saybrowsercols {
 	my ($id, $browser) = @_;
 	my $data = $caniuse->{data}->{$id}->{stats}->{$browser};
+	if (ref $data eq 'ARRAY') {
+		# special case for unsupported
+		my $release = $caniuse->{agents}->{$browser}->{verrelease};
+		$data = {
+			map { $_ => defined $release->{$_} ? 'u' : 'n' } keys %$release
+		};
+	}
 
 	my ($prev, @span);
 	for my $ver (@{ $versions{$browser} }, undef) {
 		my $compare = (
 			!defined $ver ? undef :      # last column if nameless
-			ref $data ne 'HASH' ? 'u' :  # unsupported if no support hash
-			$data->{$ver}                # known
-			|| 'u'                       # unsure unless oldest is unsupported
+			ref $data ne 'HASH' ? '' :   # unclassified if no support hash
+			$data->{$ver} // $prev       # known or inherit from predecessor
+			// (grep { defined } @{$data}{ @{ $versions{$browser} } })[0]
+			   ~~ 'n' && 'n'             # first known version is unsupported
+			|| 'u'                       # unsure
 		);
 		unless (!defined $prev or $prev ~~ $compare) {
 			my $usage = sum(map { $canihas->{$browser}->{$_} } @span);