remove &tex_de_er().
authorimiyazaki <imiyazaki>
Wed, 22 Oct 2003 16:57:19 +0000 (16:57 +0000)
committerimiyazaki <imiyazaki>
Wed, 22 Oct 2003 16:57:19 +0000 (16:57 +0000)
outCMAP

diff --git a/outCMAP b/outCMAP
index c70563a..eec980f 100755 (executable)
--- a/outCMAP
+++ b/outCMAP
@@ -166,7 +166,7 @@ while(<>){
        $_=decode('utf8', $_);
        s/(.)/pack("U",&get_char_id(unpack("U",$1),$in_cs))/ge;
     }
-    s/(amp.+?;)/&tex_de_er($1)/ge;
+    s/(amp.+?;)/&de_er($1)/ge;
 #    s/(&.+?;)/&tex_de_er($1)/ge;
     @chars=split(//);
     for($i=0;$i<=$#chars;$i++){
@@ -222,19 +222,6 @@ flock(IDSDATA,LOCK_UN);
 
 exit 0;
 
-sub tex_de_er{
-    my($er)=@_;
-    my($out);
-    $er=~s/^amp(.*);$/$1/;
-#    $er=~s/^&(.*);$/$1/;
-    $out=&de_er($er);
-    if($out and $out ne $er){
-       return $out;
-    }else{
-       return "amp$er;";
-    }
-}
-
 sub add_break{
     my($i)=@_;