OSDN Git Service

・板更新で毎回更新項目が出てしまうので修正。
authoryoffy <yoffy>
Mon, 24 Nov 2003 10:50:01 +0000 (10:50 +0000)
committeryoffy <yoffy>
Mon, 24 Nov 2003 10:50:01 +0000 (10:50 +0000)
NewBoard.pas

index e39bb64..288a028 100644 (file)
@@ -240,7 +240,7 @@ begin
                                        if i <> 0 then begin
                                                URL := Copy(tmp, 1, i - 1);
                                                Title := Copy(tmp, i + 1, Length(tmp));
-                                               Board := BBSsFindBoardFromTitle(Title);
+                                               Board := BBSs[ 0 ].FindBoardFromTitle(Title);
                                                if Board = nil then begin
                                                        MessageMemo.Lines.Add('\90V\94Â\92Ç\89Á\81u' + Title + '(' + URL + ')\81v');
                                                        ini.WriteString(cate, Title, URL);