Fixed bug of preparing parts function when preparing multiple parts.

diff --git a/makettf/index.html b/makettf/index.html
index 5785f96..77433d6 100644 (file)
--- a/makettf/index.html
+++ b/makettf/index.html
@@ -46,4 +46,3 @@ Webサーバの制約により生成に6分以上かかる場合は失敗しま
 </body>
 </html>
 
-

diff --git a/makettf/makettf.pl b/makettf/makettf.pl
index 4ce2284..7eb22bc 100755 (executable)
--- a/makettf/makettf.pl
+++ b/makettf/makettf.pl
@@ -57,7 +57,7 @@ sub makefont{
 
 sub addsubset{
     $subset{$_[0]} = $buhin{$_[0]};
-    if($buhin{$_[0]} =~ m/(^|\$)99:[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:(.+?)(\$|$)/){
+    while($buhin{$_[0]} =~ m/(^|\$)99:[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:(.+?)(\$|$)/gc){
        if(!exists($subset{$2})){
            &addsubset($2);
        }