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: minor html validation fixes
[sheet.git]
/
browser.plp
diff --git
a/browser.plp
b/browser.plp
index c10c20f212e8bef099090184f6572e6e81bb780d..13e6b5e1ac7f30f6d3e97091a5d344436172db31 100644
(file)
--- a/
browser.plp
+++ b/
browser.plp
@@
-39,7
+39,6
@@
given ($get{usage} // 'wm') {
:>.
</p>
:>.
</p>
-<div id="browser">
<:
my $caniuse = do 'browser-support.inc.pl' or die $! || $@;
$_->{verrelease} = {
<:
my $caniuse = do 'browser-support.inc.pl' or die $! || $@;
$_->{verrelease} = {
@@
-131,7
+130,8
@@
for my $browser (@browsers) {
) for @{ $versions{$browser} };
}
print '<td>' x 1;
) for @{ $versions{$browser} };
}
print '<td>' x 1;
-print "</thead>\n";
+say '</thead>';
+say '<tfoot>', $header, '</tfoot>';
sub featurescore {
# relative amount of support for given feature
sub featurescore {
# relative amount of support for given feature
@@
-242,6
+242,7
@@
sub sayusagecol {
print '<td>', int featurescore($caniuse->{data}->{$id}->{stats}) / $maxscore * 100;
}
print '<td>', int featurescore($caniuse->{data}->{$id}->{stats}) / $maxscore * 100;
}
+say '<tbody>';
for my $id (sort {
featurescore($caniuse->{data}->{$b}->{stats})
<=> featurescore($caniuse->{data}->{$a}->{stats})
for my $id (sort {
featurescore($caniuse->{data}->{$b}->{stats})
<=> featurescore($caniuse->{data}->{$a}->{stats})
@@
-254,8
+255,8
@@
for my $id (sort {
sayusagecol($id);
say '</tr>';
}
sayusagecol($id);
say '</tr>';
}
-
print '<tfoot>', $header
;
-
print
'</table>';
+
say '</tbody>'
;
+
say
'</table>';
sub formathtml {
my $ref = defined wantarray ? [@_] : \@_;
sub formathtml {
my $ref = defined wantarray ? [@_] : \@_;
@@
-282,8
+283,7
@@
sub showversions {
return join('‒', @span);
}
return join('‒', @span);
}
-:></div>
-
+:>
<hr>
<div class="legend">
<hr>
<div class="legend">