keys: graphical representation of linux control keys
[sheet.git] / unicode.plp
index 68d20f05723a13ce436f6558b254277d2803e678..7949edcdfd7763214b90e7d27631f88249cd67aa 100644 (file)
@@ -2,7 +2,7 @@
 
 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.",
@@ -11,7 +11,7 @@ Html({
                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 )],
 });
 
 :>
@@ -131,7 +131,7 @@ $_ and m{/*+(.+)} and @config = split /[ ]/, $1 for $Request, $get{q};
 my $tables = do 'unicode-table.inc.pl' or die $@ || $!;
 
 $glyphs->print(map {
-       my $_ = /(.*)\?(.*)/ ? ($verbose ? $2 : $1) : $_;
+       $_ = /(.*)\?(.*)/ ? ($verbose ? $2 : $1) : $_;
        if (!$_) {
                ();
        }