hebrew => [qw( iso-8859-8 cp1255 MacHebrew cp862 U59-5F )],
thai => [qw( iso-8859-11 cp874 MacThai )],
vietnamese => [qw( viscii cp1258 MacVietnamese )],
- symbols => [qw( symbol dingbats MacDingbats wingdings )],
+ symbols => [qw( symbol dingbats MacDingbats wingdings webdings )],
# iso-code shorthand
1 => 'westeur',
'symbol' => ['' => '32-127+160'],
'AdobeSymbol' => ['symbol' => '32-127+160', '' => '32-127+160'], # minor differences, irrelevant except for different '€'
'wingdings' => ['' => '32'],
+ 'webdings' => ['' => '32'],
'iso-8859-2' => ['iso-8859-1' => '160'],
'iso-8859-3' => ['iso-8859-1' => '160'], #TODO: also apply to iso-8859-9
}
}
- if (lc $input eq 'wingdings') {
- require Encode::Wingdings;
+ if ($input =~ m{ \A (?:wing|web)dings \z }ix) {
+ require "Encode/\u$input.pm";
}
if ($input =~ m{ \A u ([0-9a-f]+) (?:-([0-9a-f]+))? \z }ix) {