X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/f2e965b21a4be2aea69d887f619481e04f3ca58a..0bd2d4692d3442adabbb27f72d5207107c9cacce:/unicode.plp diff --git a/unicode.plp b/unicode.plp index f0e435f..7a70b27 100644 --- a/unicode.plp +++ b/unicode.plp @@ -38,6 +38,7 @@ if (exists $get{q}) { } if (exists $get{html}) { $glyphs->{anno} = ['html', 'xml']; + $glyphs->{style} = 'html'; } our $verbose = exists $get{v}; @@ -45,10 +46,10 @@ our $verbose = exists $get{v}; my @config = qw( Popular punctuation/quoting - common + common=-5?common symbols/binary?symbols/binary=-5 latin/sample=-1 - sample=2- + ?sample=2- ?uncommon punctuation/version punctuation/marks @@ -70,6 +71,8 @@ my @config = qw( modifier control command + android + ps ?player Mathematics math/size @@ -114,6 +117,12 @@ my @config = qw( ?kataderiv ); +splice @config, 4, 2, qw( + latin/vowels=-5?latin/vowels + westeuro + ?easteuro +) if exists $get{html}; + $_ and m{/*+(.+)} and @config = split /[ ]/, $1 for $ENV{PATH_INFO}, $get{q}; my $tables = do 'unicode-table.inc.pl' or die $@ || $!;