Tools(listFontWithLang.pl): Add new category for double stroke fonts

This commit is contained in:
Kornel Benko 2020-06-11 19:10:56 +02:00
parent 76db479c07
commit 824be29341

View File

@ -200,6 +200,7 @@ my %ftypes = (
100 => "Sans", 100 => "Sans",
110 => "Script", 110 => "Script",
120 => "Fraktur", 120 => "Fraktur",
125 => "DoubleStroke",
130 => "Fancy", 130 => "Fancy",
140 => "Initials", 140 => "Initials",
200 => "Symbol", 200 => "Symbol",
@ -349,6 +350,7 @@ my %symbolFonts = (
"d" => qr/^(dingbats|drmsym|d05)/i, "d" => qr/^(dingbats|drmsym|d05)/i,
"e" => qr/^(elusiveicons|emoji|esint|euterpe)/i, "e" => qr/^(elusiveicons|emoji|esint|euterpe)/i,
"f" => qr/^(fandol.?brail|fdsymbol|fourierorns|font(awesome|ello|.?mfizz))/i, "f" => qr/^(fandol.?brail|fdsymbol|fourierorns|font(awesome|ello|.?mfizz))/i,
"g" => qr/^(gan.?clm|gfs.?(baskerville|gazis|olga|porson|solomos|(bodoni|didot|complutum).?classic))/i,
"h" => qr/^(hots)/i, "h" => qr/^(hots)/i,
"j" => qr/^jsmath.?(msam|cmsy|masm|msbm|wasy|cmex|stmary)/i, "j" => qr/^jsmath.?(msam|cmsy|masm|msbm|wasy|cmex|stmary)/i,
"m" => qr/^(marvosym|material|msam|msbm)/i, "m" => qr/^(marvosym|material|msam|msbm)/i,
@ -701,6 +703,9 @@ sub getftype($$)
return($ftypes{0}); # Serif return($ftypes{0}); # Serif
} }
} }
elsif ($fontname =~ /bbold|msbm|^dsrom/i) {
return($ftypes{125}); # Double stroke (math font)
}
# Now check for fonts without a hint in font name # Now check for fonts without a hint in font name
if ($fontname =~ /^([a-z])/i) { if ($fontname =~ /^([a-z])/i) {
my $key = lc($1); my $key = lc($1);