$row->{set} = 'UTF-8';
$row->{cell} = do 'charset-utf8.inc.pl'
or Alert('Table data could not be read', $@ || $!);
- $row->{endpoint} = 0xFF;
return $row;
}},
'utf-8' => 'utf8',
eval { $charset->{setup}->(\%row) }
or Alert("Incomplete setup of $input", $@);
}
+ $row{endpoint} ||= 0xFF;
if ($row{set}) {}
elsif ($row{set} = Encode::resolve_alias($input)) {
$row{offset} = delete $row{startpoint};
- $row{endpoint} ||= 0xFF;
if ($row{set} eq 'MacHebrew' or $row{set} eq 'MacThai') {
# array of possibly multiple characters per code point
$row{table} = [