next if /^[.-]/;
next if $_ eq '>' or $_ eq '=';
s/^\\//; # escape
+ length $_ == 1 or next; # multiple characters lost in query
push @{ $charlist{table}->{"$tablegroup/$tablename"} }, $_;
push @{ $charlist{table}->{$tablegroup} }, $_;
}
$charlist{fonts} = \@fontlist;
my %osfonts = (
- win95 => [qw( arial arialuni lucidau verdana times courier )], # microsoft
+ win95 => [qw( arial arialuni lucidau verdana timesnew couriernew )], # microsoft
mac10 => [qw( helvetica lucida times garamond palatino )], # apple
android => [qw( roboto noto )], # google
oss => [qw( dvsans c2k unifont opensans )],