All letter/diacritic combinations for major european languages,
included for ?html for a more complete entity coverage.
. ă ę œ ů š ð
. ı ė º ư ș đ
}],
+ vowels => [qw{
+ . á é í ó ú ý
+ . â ê î ô û ŷ
+ . à è ì ò ù ỳ
+ . ã ẽ ĩ õ ũ ỹ
+ . ä ë ï ö ü ÿ
+ . æ & ij œ ᵫ -
+ . å - ı ⱺ ů ẙ
+ . ă ĕ ĭ ŏ ŭ -
+ . ǎ ě ǐ ǒ ǔ -
+ . ą ę į ǫ ų -
+ }],
+ westeuro => [qw{
+ . ç ð ñ ß þ
+ }],
+ easteuro => [qw{
+ . č ď ľ ň ř š ť ž
+ . ć đ ł ń ŕ ś ŧ ź ż
+ }],
uncommon => [qw{
.>Englisc æ ð ē ȝ œ þ ƿ
.>Sámi á č đ ŋ š ŧ ž
?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 $@ || $!;