browser: prevent rounding errors in usage percentage
authorMischa POSLAWSKY <perl@shiar.org>
Fri, 17 Dec 2010 20:42:25 +0000 (21:42 +0100)
committerMischa POSLAWSKY <perl@shiar.org>
Tue, 11 Jan 2011 22:41:38 +0000 (23:41 +0100)
browser.plp

index fa317a8..da50b2d 100644 (file)
@@ -154,7 +154,7 @@ my $usagemax = (max(map { ref $_ eq 'HASH' && sum(values %$_) } values %$canihas
 
 my $usagepct = 1;  # score multiplier for 0..100 result
 # normalise usage percentage to only include shown browsers
-$usagepct = 100 / featurescore({  # yes for every possible version
+$usagepct = 100.01 / featurescore({  # yes for every possible version
        map { $_ => { map {$_ => 'y'} @{$versions{$_}} } } keys %versions
 });