git.shiar.nl
/
sheet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
browser: count score for new status "p p"
[sheet.git]
/
browser.plp
diff --git
a/browser.plp
b/browser.plp
index 3dc8d806eda37a7bb4c57c57fdeb377f99ee3a2c..741868ba148a12bc3b9eea1261953aec88011148 100644
(file)
--- a/
browser.plp
+++ b/
browser.plp
@@
-135,14
+135,14
@@
print "</thead>\n";
sub featurescore {
# relative amount of support for given feature
sub featurescore {
# relative amount of support for given feature
- state $statspts = { y=>10, 'y x'=>10, a=>5, 'a x'=>5, j=>2, 'p j'=>2, p=>1 };
+ state $statspts = { y=>10, 'y x'=>10, a=>5, 'a x'=>5, j=>2, 'p j'=>2,
'p p'=>2,
p=>1 };
my $rank = 0;
if (my $row = shift) {
if ($canihas) {
while (my ($browser, $versions) = each %$row) {
ref $versions eq 'HASH' or next;
while (my ($version, $_) = each %$versions) {
my $rank = 0;
if (my $row = shift) {
if ($canihas) {
while (my ($browser, $versions) = each %$row) {
ref $versions eq 'HASH' or next;
while (my ($version, $_) = each %$versions) {
- $rank +=
$canihas->{$browser}->{$version}
* $statspts->{$_};
+ $rank +=
($canihas->{$browser}->{$version} || .001)
* $statspts->{$_};
}
}
return $rank;
}
}
return $rank;
@@
-172,7
+172,7
@@
sub saytitlecol {
for ($row->{categories}) {
my $cell = $_ ? lc $_->[0] : '-';
for ($row->{categories}) {
my $cell = $_ ? lc $_->[0] : '-';
- print
'<th>'
, $cell;
+ print
f '<th title="%s">%s', join(' + ', @$_)
, $cell;
}
print '<td>', map {
}
print '<td>', map {