From: imiyazaki <imiyazaki>
Date: Mon, 5 Jan 2004 13:42:52 +0000 (+0000)
Subject: add support for Utf8big5.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=9969e0db647a2210ed0e1d616629a4b15a99e67e;p=chise%2Fomega.git

add support for Utf8big5.
use ids-aggregated.
---

diff --git a/inCHISE b/inCHISE
index dd9dc47..09cb0f8 100755
--- a/inCHISE
+++ b/inCHISE
@@ -83,7 +83,7 @@ my $tex_meta_re=join('|',map {quotemeta($_)} keys %tex_meta);
 $usage=<<EOF;
 Usage: $0 -i <input coding system> -o <cmap encoding>
     input coding system:
-      Utf8mcs, Utf8cns, Utf8gb, Utf8jis, Utf8ks
+      Utf8mcs, Utf8cns, Utf8gb, Utf8jis, Utf8ks, Utf8big5
     cmap encoding:
       UniCNS, UniGB, UniJIS, UniKS, UniMulti
 EOF
@@ -96,7 +96,7 @@ if($opt_in_cs or $opt_out_cs){
 }
 
 # $in_cs:
-#   Utf8mcs,Utf8cns,Utf8gb,Utf8jis,Utf8ks,
+#   Utf8mcs,Utf8cns,Utf8gb,Utf8jis,Utf8ks,Utf8big5
 # $out_cs:
 #   UniCNS,UniGB,UniJIS,UniKS,UniMulti
 
@@ -496,10 +496,10 @@ sub get_ids{
     # return: ids
     my($char)=@_;
     my $ids="";
-#    $ids=&get_char_attribute($char,"ids-aggregated")
-#	or $ids=&get_char_attribute($char,"ids");
-    $ids=&get_char_attribute($char,"ids-decomposed")
+    $ids=&get_char_attribute($char,"ids-aggregated")
 	or $ids=&get_char_attribute($char,"ids");
+#    $ids=&get_char_attribute($char,"ids-decomposed")
+#	or $ids=&get_char_attribute($char,"ids");
 #	  or $ids=&get_char_attribute($char,"ideographic-structure");
 #    $ids=~s/[? ()]//g;
     return $ids;