Fix: return output char in ucs@jis in &get_output_char.
authorimiyazaki <imiyazaki>
Tue, 26 Oct 2004 13:00:18 +0000 (13:00 +0000)
committerimiyazaki <imiyazaki>
Tue, 26 Oct 2004 13:00:18 +0000 (13:00 +0000)
chise2otf/chise2otf

index c9c5002..6216d62 100755 (executable)
@@ -372,7 +372,7 @@ sub get_output_char{
        or $out_char=&get_char_attribute($char,'=jis-x0208-1983')
        or $out_char=&get_char_attribute($char,'=jis-x0208-1990')
       ){
-       return $char;
+       return &get_char_attribute($out_char,'=ucs@jis');
     }else{
        foreach $out_cs (@order){
            if($out_cs eq 'UniJIS'