X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/917ba679115b9e3cd7b88f7e5081a1a2503a684e..d9ec472869a2c33c469cad90a21b221f14f29af3:/font.plp diff --git a/font.plp b/font.plp index ec61202..07df3bd 100644 --- a/font.plp +++ b/font.plp @@ -158,10 +158,11 @@ EOT # display literal character, with placeholder circle if non-spacing/enclosing my $html = ($class =~ /\bM[ne]\b/ && chr 9676) . EscapeHTML(chr $cp); say sprintf '%s', - !$class ? ('l0', $cp, '', '') : + !$class ? ('l0', $cp, '', '') : ( $cover{$cp} ? $np ? 'l2' : 'l5' : $np ? 'Xi' : 'l1', $cp, !!$name && ": $name", - ($cover{$cp} || !$np) && $html; + ($cover{$cp} || !$np) && $html + ); } say '';