change priority of unified characters. Now unified character is used prior to the...

diff --git a/inCHISE b/inCHISE
index 115809f..8467c79 100755 (executable)
--- a/inCHISE
+++ b/inCHISE
@@ -185,6 +185,17 @@ while(<>){
        }else{
            if(($out_char=&get_output_char($char,$out_cs))){
                print $out_char,&add_break($i);
+           }elsif($opt_allow_unify){
+               @chars_unified=&get_chars_unified($char);
+               if(@chars_unified>0){
+                   foreach $char_unified (@chars_unified){
+                       if(($out_char
+                           =&get_output_char($char_unified,$out_cs))){
+                           print $out_char,&add_break($i);
+                           next CHAR;
+                       }
+                   }
+               }
            }elsif($char_id >= 0x20000 && $char_id <=0x2a6df){
                # CJK Unified Ideographs Extension B
                if(not defined($ids{$char}) and $ids{$char}[1]>=0){
@@ -201,18 +212,6 @@ while(<>){
                    "}\\selectfont\\char$ids{$char}[1]}",&add_break($i);
                next CHAR;
            }else{
-               if($opt_allow_unify){
-                   @chars_unified=&get_chars_unified($char);
-                   if(@chars_unified>0){
-                       foreach $char_unified (@chars_unified){
-                           if(($out_char
-                               =&get_output_char($char_unified,$out_cs))){
-                               print $out_char,&add_break($i);
-                               next CHAR;
-                           }
-                       }
-                   }
-               }
                if($ids=&get_ids($char)){
                    print &get_macro_for_ids($ids),&add_break($i);
                }else{