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