X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/dcf2735abfb4761a45521b5fcfd2c0c61d7da4e9..4268fe1b48ef3f5951c401477b20cd1300e07536:/digraphs.plp diff --git a/digraphs.plp b/digraphs.plp index 3f2d1bf..702e3e6 100644 --- a/digraphs.plp +++ b/digraphs.plp @@ -63,7 +63,7 @@ for my $c1group (@chars) { my @class = ('X', grep {$_} $prop, $script); $glyph = EscapeHTML($glyph); - $glyph = "$glyph" if $prop eq 'Zs'; + $glyph = "$glyph" if $prop =~ /\bZs\b/; printf "\n".'%s', join(' ', @class), EscapeHTML($desc), $glyph;