不具合報告スレ

2 ：名無しさん＠０ちゃんねる：2003/01/23 23:19 ID:???

test030118\print.pl
　　　 109:　　printb("</form></center>$SysInfo{'CgiVersion'}</td></tr></table>");
　　　 110:　　printb("</body></html>\n");
　　　 111:　}

test030118-fix\print.pl
　　　 109:　　printb("</form></center>$SysInfo{'CgiVersion'}</td></tr></table>");
変更 110:　　printb("</center></body></html>\n");
　　　 111:　}


test030118\print.pl
　　　 187:　　printb("<a href=\"$SETTING{'BBS_TITLE_LINK'}\">");
　　　 188:　}

test030118-fix\print.pl
　　　 187:　　printb("<a href=\"$SETTING{'BBS_TITLE_LINK'}\">");
追加 188:　　printb("<img src=\"$SETTING{'BBS_KANBAN'}\" border=0></a><br><br>");
　　　 189:　}

3 ：名無しさん＠０ちゃんねる：2003/01/23 23:20 ID:???

test030118\print.pl
　　　 188:　　}
　　　 189:　　printb("<img src=\"$SETTING{'BBS_KANBAN'}\"
　　　　　　　　 border=0 /></a><br><br>");
　　　 190:　}

test030118-fix\print.pl
　　　 189:　　}
変更 190:　　printb("<img src=\"$SETTING{'BBS_KANBAN'}\"
　　　　　　　　 border=0></a><br><br>");
　　　 191:　}

test030118\print.pl
　　　 294:　printb("<a href=\"#top\">板トップ</a> ");
　　　 295:　printb("<a href=\"$SysInfo{'BoardRoot'}/
　　　　　　　$SysInfo{'BoardName'}/index.html\">リロード</a>\n");

　　　 296:　printb("</dl></td></tr></table></td></tr></ul></form>
　　　　　　　</table><br>\n");
　　　 297:　$i ++;

test030118-fix\print.pl
　　　 295:　printb("<a href=\"#top\">板トップ</a> ");
変更 296:　printb("<a href=\"$SysInfo{'BoardRoot'}/
　　　　　　　$SysInfo{'BoardName'}/index.html\">リロード</a></b>\n");

変更 297:　printb("</ul></form></dl></td></tr></table></td></tr>
　　　　　　　</table><br>\n");
　　　 298:　$i ++;

4 ：名無しさん＠０ちゃんねる：2003/01/23 23:21 ID:???

test030118\print.pl
　　　 335:　　printb("</form></center>$SysInfo{'CgiVersion'}</td></tr></table>");
　　　 336:　　printb("</body></html>\n");
　　　 337:　}

test030118-fix\print.pl
　　　 336:　　printb("</form></center>$SysInfo{'CgiVersion'}</td></tr></table>");
変更 337:　　printb("</center></body></html>\n");
　　　 338:　}


test030118\print.pl
　　　 407:　$tl = $CGet->GetTextLine($text);　# メッセージの改行数取得
　　　 408:　printb("<dt>$num 名前：<b>");
　　　 409:　if　($mail eq ""){　# メール欄無し

test030118-fix\print.pl
　　　 408:　$tl = $CGet->GetTextLine($text);　# メッセージの改行数取得
変更 409:　printb("<dt>$num 名前：");
　　　 410:　if　($mail eq ""){　# メール欄無し

5 ：名無しさん＠０ちゃんねる：2003/01/23 23:22 ID:???

test030118\print.pl
　　　 409:　if　($mail eq ""){　# メール欄無し
　　　 410:　　printb("<font color=$SETTING{'TEXT_COLOR_NAME'}>$name</font>");
　　　 411:　}

test030118-fix\print.pl
　　　 410:　if　($mail eq ""){　# メール欄無し
変更 411:　　　　 printb("<font color=$SETTING{'TEXT_COLOR_NAME'}><b>$name</b></font>");
　　　 412:　}


test030118\print.pl
　　　 412:　else{　　　　　　　　　　　　　　　　　　 # メール欄あり
　　　 413:　　printb("<a href=\"mailto:$mail\">$name</a>");
　　　 414:　}
test030118-fix\print.pl
　　　 413:　else{　　　　　　　　　　　　　　　　　　 # メール欄あり
変更 414:　　printb("<a href=\"mailto:$mail\"><b>$name</b></a>");
　　　 415:　}

6 ：名無しさん＠０ちゃんねる：2003/01/23 23:22 ID:???

test030118\print.pl
　　　 415:　if　($mode || $tl <= $SETTING{'LIMIT_DISP_LINE'}){　# 指定表示時・表示限界内なら
　　　 416:　　printb("</b> ：$date<br><dd>$text<br><br></dd></dt>\n");
　　　 417:　}

test030118-fix\print.pl
　　　 416:　if　($mode || $tl <= $SETTING{'LIMIT_DISP_LINE'}){　# 指定表示時・表示限界内なら
変更 417:　　printb("：$date</dt><br><dd>$text<br><br></dd>\n");
　　　 418:　}


test030118\print.pl
　　　 419:　@dispBuff = split(/<br>|<BR>/,$text);
　　　 420:　printb("</b> ：$date<br><dd>");
　　　 421:　for ($k = 0;$k < $SETTING{'LIMIT_DISP_LINE'};$k++){　 # 表示限界までループ

test030118-fix\print.pl
　　　 420:　@dispBuff = split(/<br>|<BR>/,$text);
変更 421:　printb("：$date</dt><br><dd>");
　　　 422:　for ($k = 0;$k < $SETTING{'LIMIT_DISP_LINE'};$k++){　 # 表示限界までループ

7 ：名無しさん＠０ちゃんねる：2003/01/23 23:23 ID:???

test030118\print.pl
　　　 425:　　printb("<a href=\"$SysInfo{'CgiRoot'}/read.cgi/
　　　　　　　　$SETTING{'BBS_PATH'}/$key/${num}n\"");
　　　 426:　　printb(" target=_blank>こちら</a>を押してください）</font>
　　　　　　　　<br><br></dd></dt>\n");
　　　 427:　}

test030118-fix\print.pl
　　　 426:　　printb("<a href=\"$SysInfo{'CgiRoot'}/read.cgi/
　　　　　　　　$SETTING{'BBS_PATH'}/$key/${num}n\"");
変更 427:　　printb(" target=_blank>こちら</a>を押してください）</font>
　　　　　　　　<br><br></dd>\n");
　　　 428:　}


test030118\print.pl
　　　 476:　　printb("<textarea rows=6 cols=70 wrap=off name=\"MESSAGE\">
　　　　　　　　</textarea></td></tr></table>\n");
　　　 477:　　printb("</form></body></html>");
　　　 478:　}

test030118-fix\print.pl
　　　 477:　　printb("<textarea rows=6 cols=70 wrap=off name=\"MESSAGE\">
　　　　　　　　</textarea></td></tr></table>\n");
変更 478:　　printb("</form></center></body></html>");
　　　 479:　}

8 ：名無しさん＠０ちゃんねる：2003/01/23 23:23 ID:???

test030118\print.pl
　　　 740:　　printb("<hr><a href=\"$SysInfo{'CgiRoot'}/
　　　　　　　　subbbs.cgi?bbs=$SysInfo{'BoardName'}\">");
　　　 741:　　printb("スレッド作成</a><hr></body></html>\n");
　　　 742:　}

test030118-fix\print.pl
　　　 741:　　printb("<hr><a href=\"$SysInfo{'CgiRoot'}/
　　　　　　　　subbbs.cgi?bbs=$SysInfo{'BoardName'}\">");
変更 742:　　printb("スレッド作成</a><hr></center></body></html>\n");
　　　 743:　}


test030118\print.pl
　　　 764:　printb("<dl><dt>1 名前：<b><font color=$SETTING{'TEXT_COLOR_NAME'}>
　　　　　　　$SysInfo{'CgiVersion'}");
　　　 765:　printb("</font></b>投稿日：<br>\n<dd>そんな板orスレッドないです</dd>
　　　　　　　</dt></dl><br><br>\n");
　　　 766:　PrintBanner("",$SysInfo{'AgentMode'},$SysInfo{'Debug'},100,%SysInfo);

test030118-fix\print.pl
　　　 765:　printb("<dl><dt>1 名前：<b><font color=$SETTING{'TEXT_COLOR_NAME'}>
　　　　　　　$SysInfo{'CgiVersion'}");
変更 766:　printb("</font></b>投稿日：</dt><br>\n<dd>そんな板orスレッドないです</dd>
　　　　　　　</dl><br><br>\n");
　　　 767:　PrintBanner("",$SysInfo{'AgentMode'},$SysInfo{'Debug'},100,%SysInfo);

9 ：名無しさん＠０ちゃんねる：2003/01/23 23:25 ID:???

test030118\print.pl
　　　 858:　　}
　　　 859:　　printb("</b> ：$dt<br><dd>$txt<br><br></dd></dt>\n");
　　　 860:　}

test030118-fix\print.pl
　　　 859:　　}
変更 860:　　printb("</b> ：$dt</dt><br><dd>$txt<br><br></dd>\n");
　　　 861:　}

test030118\admin.cgi
　　　 536:　($name,$mail,$date,$msg,$dmy) = split(/<>/,$_);
　　　 537:　print KAKO "<a name=$num></a><dt>$num 名前：<b>";
　　　 538:　if ($mail eq ""){ print KAKO "<font color=
　　　　　　　$Setting{'TEXT_COLOR_NAME'}>$name</font>"; }
　　　 539:　else{ print KAKO "<a href=\"mailto:$mail\">$name</a>"; }
　　　 540:　$msg =~ s{&gt;&gt;(\d+)}{<a href=#$1>&gt;&gt;$1</a>}g;　# 引用 n
　　　 541:　print KAKO "</b> ：$date<br><dd>$msg<br><br></dd></dt>\n";
　　　 542:　$num++;

test030118-fix\admin.cgi
　　　 536:　($name,$mail,$date,$msg,$dmy) = split(/<>/,$_);
変更 537:　print KAKO "<a name=$num></a><dt>$num 名前：";
変更 538:　if ($mail eq ""){ print KAKO "<font color=
　　　　　　　$Setting{'TEXT_COLOR_NAME'}><b>$name</b></font>"; }
変更 539:　else{ print KAKO "<a href=\"mailto:$mail\"><b>$name</b></a>"; }
　　　 540:　$msg =~ s{&gt;&gt;(\d+)}{<a href=#$1>&gt;&gt;$1</a>}g;　# 引用 n
変更 541:　print KAKO " ：$date</dt><br><dd>$msg<br><br></dd>\n";
　　　 542:　$num++;