Html({
title => 'unicode glyph cheat sheet',
- version => '1.1',
+ version => '1.2',
description => [
"Common Unicode characters with digraph or code point, layed out for quick location.",
"Includes general symbols, arrows, drawing characters, and IPA letters.",
unicode glyph char character reference common ipa symbol sign mark table digraph
'],
stylesheet => [qw'light dark mono circus red'],
- data => [qw'unicode-table.inc.pl unicode-char.inc.pl'],
+ data => [qw( unicode-table.inc.pl data/unicode-char.inc.pl )],
});
:>
control
command
android=0
- ps
+ ps=0
?player
Mathematics
math/size
my $tables = do 'unicode-table.inc.pl' or die $@ || $!;
$glyphs->print(map {
- my $_ = /(.*)\?(.*)/ ? ($verbose ? $2 : $1) : $_;
+ $_ = /(.*)\?(.*)/ ? ($verbose ? $2 : $1) : $_;
if (!$_) {
();
}
$group = $1 if s{^([^/]+)/}{};
my @select = s/=(.*)// ? split(/=/, $1) : ();
my $table = $tables->{$group}->{$_}
- or die "Unknown table specified: $group/$_";
+ or Abort("Unknown table specified: $group/$_", 404);
if (@select) {
my $rowlen;