$output_char=pack("U",hex($1));
}elsif($er=~/^(?:I\-)?($er_prefix_re)\-?([0-9a-fA-F]+)$/){
($atr,$value)=($1,$2);
- unless($er_alias{$atr}=~/daikanwa|gt/){
+ if($er_alias{$atr}=~/daikanwa|gt/){
+ $value+=0;
+ }else{
$value=hex($value);
}
($output_char)=&get_chars_matching($er_alias{$atr},$value);