X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/dc6b482b5e7e1d3d35b5193fc820c5e1afc29a6e..b44d61378ef1395d5003610a7904a6c2351243a5:/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 (!$_) { (); }