X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/38c0f94fbc07d23581704b72a7e6d3cbe4dfa96c..a93c5c61b18192c5f74256e3cb18e7f1cd2034d5:/charset.plp diff --git a/charset.plp b/charset.plp index 2257fb8..9ab15f1 100644 --- a/charset.plp +++ b/charset.plp @@ -98,6 +98,7 @@ sub tabinput { state $visible = {'' => 1}; # all present tables my %row = (offset => 0, cols => 16); + $row{$_} = $charset->{$_} for qw( note ); # copy metadata if (not defined $params) { my @parents = @{ $charset->{inherit} || [] }; @@ -291,8 +292,8 @@ for my $row (@request) { printf '
', !$row->{cell} && ' charmap'; my $title = $row->{set}; - $title .= " " - for $row->{parent} || (); + $title .= " " for $row->{parent} || (); + $title .= " " for $row->{note} || (); printf '', $title; print '' x ($cols + 1); for my $section (qw{thead}) {
%s