browser: fix duplicate versions in total browser usage

diff --git a/browser.plp b/browser.plp
index 19011ab21d91ae8b601244de11f0f2ce58a32ed4..02e7e0b7a2481d72d08333392883e5e7481177c6 100644 (file)
--- a/browser.plp
+++ b/browser.plp
@@ -99,9 +99,10 @@ if ($usage) {
                $row->{$_} //= undef for @$verlist;  # ensure stable keys during iteration
                while (my ($version, $usage) = each %$row) {
                        next if defined $supported{$version};
-                       $_ = paddedver($_) for $version;
-                       my $next = first { paddedver($_) ge $version } @$verlist; # or next
+                       my $next = first { paddedver($_) ge paddedver($version) } @$verlist
+                               or warn("No fallback found for $browser v$version; $usage% ignored"), next;
                        $row->{$next} += $usage;
+                       $row->{$version} = 0;  # balance browser total
                }
        }
 }