X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/8bc72cf576806b52fae4b4e34505fcd84b97e2bf..675221b52b08ff40fa91f38fe2eae05a4ef155bc:/chars.plp diff --git a/chars.plp b/chars.plp index 775674e..ebfdc6b 100644 --- a/chars.plp +++ b/chars.plp @@ -104,8 +104,10 @@ print ''; print 'unicode'; print 'name'; print 'dihtml'; -printf '%s', $font{$_}->{-name}, $font{$_}->{-abbr} - for @fontlist; +printf('%s', map { EscapeHTML($_) } + join("\n", $font{$_}->{-name}, $font{$_}->{-description}), + $font{$_}->{-abbr}, +) for @fontlist; say ''; for my $chr (@chars) {