use &get_chars_matching()

diff --git a/chise2otf/add_adobecid.pl b/chise2otf/add_adobecid.pl
index c183a36..cdcbb64 100644 (file)
--- a/chise2otf/add_adobecid.pl
+++ b/chise2otf/add_adobecid.pl
@@ -110,12 +110,10 @@ sub replace_char{
     my($ucs,$encoding)=@_;
     my($output_char);
 
-    if(&get_reverse_db($encoding)){
-       if($output_char=$reverse_chardb{$encoding}->{$ucs}){
-           $output_char=decode('utf8', $output_char) if($perl58);
-           $output_char=~s/^\?//;
-           return $output_char;
-       }
+    if(($output_char)=&get_chars_matching($encoding,$ucs)){
+       $output_char=decode('utf8', $output_char) if($perl58);
+       $output_char=~s/^\?//;
+       return $output_char;
     }else{
        return undef;
     }