From: Mischa POSLAWSKY <perl@shiar.org>
Date: Tue, 29 Mar 2011 19:00:27 +0000 (+0200)
Subject: browser: parse version array of browsers without usage data
X-Git-Tag: v1.5~62
X-Git-Url: http://git.shiar.nl/sheet.git/commitdiff_plain/9cc2512f2fbaf5ee2f423104edd65937a01d8fce

browser: parse version array of browsers without usage data
---

diff --git a/browser.plp b/browser.plp
index c258677..518dee5 100644
--- a/browser.plp
+++ b/browser.plp
@@ -96,7 +96,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;