padding: 0.1em;
margin-right: 0.2em;
}
+ #unistrokes svg path {
+ stroke-linecap: round;
+ stroke-linejoin: round;
+ }
svg path:not([fill]) {
stroke: currentColor;
say '</thead>';
for my $row (pairs @table) {
- my ($title, $cells) = @{$row};
+ my ($title, $info) = @{$row};
printf '<tr id="%s">', (lc $title) =~ s/<[^>]+>//gr =~ s/\s+/-/gr;
say '<th>', $title;
my $colspan = 1;
my $col = 0;
- for (@{$cells}) {
+ for (@{ $info->{list} }) {
$col++;
if ($_ eq '>') {
$colspan++;