X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/dc6b482b5e7e1d3d35b5193fc820c5e1afc29a6e..194cffeee825787e5ac61e3919681d19b9109aaf:/unicode.plp diff --git a/unicode.plp b/unicode.plp index a3273e3..7949edc 100644 --- a/unicode.plp +++ b/unicode.plp @@ -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 (!$_) { (); }