enable &de_er() to work.

add IDC escape.

diff --git a/chise2otf/chise2otf b/chise2otf/chise2otf
index 17ee581..ab1274c 100755 (executable)
--- a/chise2otf/chise2otf
+++ b/chise2otf/chise2otf
@@ -158,7 +158,8 @@ while(<>){
     if($in_cs ne 'ucs@mcs'){
        s/(.)/pack("U",&get_char_id(unpack("U",$1),$in_cs))/ge;
     }
-    s/&(.*?);/&de_er($1)/ge;
+    s/((?:^|[^\\])(?:\\\\)*)(&.*?;)/$1.&de_er($2)/ge;
+    s/((?:^|[^\\])(?:\\\\)*)\\([$idc])/$1.'\UTFM{'.sprintf("%X",unpack("U",$2)).'}'/ge;
     @chars=split(//);
     for($i=0;$i<=$#chars;$i++){
        $char=$chars[$i];