git.shiar.nl
/
sheet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
vi: fix plp block in perl include
[sheet.git]
/
browser.plp
diff --git
a/browser.plp
b/browser.plp
index 258999e834364ce4cf4b4a07278fa1ff07d38783..2f75abd8b5cee9464a9cca102b9e9683be7c005e 100644
(file)
--- a/
browser.plp
+++ b/
browser.plp
@@
-107,9
+107,9
@@
$canihas ||= {
my $scorediv = (max(map { ref $_ eq 'HASH' && sum(values %$_) } values %$canihas) // 1) / 100;
print '<table class="mapped">';
my $scorediv = (max(map { ref $_ eq 'HASH' && sum(values %$_) } values %$canihas) // 1) / 100;
print '<table class="mapped">';
-print '<col
>' x 3;
+print '<col
span="3">'; # should match first thead row
printf '<colgroup span="%d">', scalar @{ $versions{$_} } for @browsers;
printf '<colgroup span="%d">', scalar @{ $versions{$_} } for @browsers;
-
print "\n"
;
+
say '</colgroup><col>'
;
my $header = join('',
'<tr>',
my $header = join('',
'<tr>',
@@
-119,7
+119,7
@@
my $header = join('',
sprintf('<th colspan="%d" class="%s" title="%s">%s',
scalar @{ $versions{$_} },
join(' ', map {"b-a-$_"} grep {$_}
sprintf('<th colspan="%d" class="%s" title="%s">%s',
scalar @{ $versions{$_} },
join(' ', map {"b-a-$_"} grep {$_}
- $_,
$caniuse->{agents}->{$_}->{prefix
},
+ $_,
@{ $caniuse->{agents}->{$_} }{'prefix', 'type'
},
),
join(' ',
sprintf('%.1f%%', sum(values %{ $canihas->{$_} })),
),
join(' ',
sprintf('%.1f%%', sum(values %{ $canihas->{$_} })),