From 6fa4bc98c0d70919d04d6f315bd32343bc035166 Mon Sep 17 00:00:00 2001 From: Koichi KAMICHI Date: Fri, 10 Feb 2006 05:52:51 +0000 Subject: [PATCH] Fixed. --- makettf/makettf.cgi | 19 ------------------- 1 file changed, 19 deletions(-) diff --git a/makettf/makettf.cgi b/makettf/makettf.cgi index a41acd6..9354620 100755 --- a/makettf/makettf.cgi +++ b/makettf/makettf.cgi @@ -24,25 +24,6 @@ if($fontname_en eq ""){ if($fontname_ja eq ""){ $fontname_ja = $fontname_en; } -$partsdata = $form->param('partsdata'); -$partsdata =~ s/[\;\&\#\"\'\%\\]//g; -$mappingtable = $form->param('mappingtable'); -$mappingtable =~ s/[\;\&\#\"\'\%\\\$\:]//g; -@unicoderange = (); -for(my $i = 0; $i < 16; $i++){ - $unicoderange[$i] = $form->param("unicoderange$i"); - $unicoderange[$i] =~ s/[^0-9a-fA-F\-]//g; - if($unicoderange[$i] eq ""){ - $unicoderange[$i] = "--"; - } -} -for(my $i = 0; $i < 4; $i++){ - $codepagerange[$i] = $form->param("codepagerange$i"); - $codepagerange[$i] =~ s/[^0-9a-fA-F]//g; - if($codepagerange[$i] eq ""){ - $codepagerange[$i] = "00"; - } -} #open FH, "<", "parts.txt"; #$temp = ""; -- 1.7.10.4