From: yoffy <yoffy>
Date: Thu, 8 Apr 2004 11:10:11 +0000 (+0000)
Subject: ・ファイルパスを生成する時にデリミタが入っていなかったバグを修正。
X-Git-Tag: v1_64_1_820~1293
X-Git-Url: http://git.osdn.net/view?a=commitdiff_plain;h=44664907785231d7d60d2955c755cb346c152de1;p=gikonavigoeson%2Fgikonavi.git

・ファイルパスを生成する時にデリミタが入っていなかったバグを修正。
---

diff --git a/BoardGroup.pas b/BoardGroup.pas
index 47b14bc..084cdd9 100644
--- a/BoardGroup.pas
+++ b/BoardGroup.pas
@@ -990,7 +990,7 @@ begin
 		FileName := ExtractFilePath( FilePath ) + FOLDER_INI_FILENAME
 	else
 		FileName := IncludeTrailingPathDelimiter( GikoSys.Setting.LogFolder )
-							+ BBS2CH_LOG_FOLDER + BBSID + PATH_DELIM + FOLDER_INI_FILENAME;
+							+ BBS2CH_LOG_FOLDER + PATH_DELIM + BBSID + PATH_DELIM + FOLDER_INI_FILENAME;
 
 	if not FileExists(FileName) then
 		Exit;
@@ -1048,7 +1048,7 @@ begin
 		FileName := ExtractFilePath( FilePath )
 	else
 		FileName := IncludeTrailingPathDelimiter( GikoSys.Setting.LogFolder )
-							+ BBS2CH_LOG_FOLDER + BBSID + PATH_DELIM;
+							+ BBS2CH_LOG_FOLDER + PATH_DELIM + BBSID + PATH_DELIM;
 	if not GikoSys.DirectoryExistsEx(FileName) then
 		GikoSys.ForceDirectoriesEx(FileName);
 	FileName := FileName + FOLDER_INI_FILENAME;
@@ -1146,7 +1146,7 @@ begin
 		Result := FilePath
 	else
 		Result := IncludeTrailingPathDelimiter( GikoSys.Setting.LogFolder )
-						+ BBS2CH_LOG_FOLDER + BBSID + PATH_DELIM + SUBJECT_FILENAME;
+						+ BBS2CH_LOG_FOLDER + PATH_DELIM + BBSID + PATH_DELIM + SUBJECT_FILENAME;
 end;
 
 // ƒCƒ“ƒfƒbƒNƒXƒtƒ@ƒCƒ‹–¼(folder.idx)Žæ“¾iƒpƒX{ƒtƒ@ƒCƒ‹–¼j
@@ -1156,7 +1156,7 @@ begin
 		Result := ExtractFilePath( FilePath ) + FOLDER_INDEX_FILENAME
 	else
 		Result := IncludeTrailingPathDelimiter( GikoSys.Setting.LogFolder )
-						+ BBS2CH_LOG_FOLDER + BBSID + PATH_DELIM + FOLDER_INDEX_FILENAME;
+						+ BBS2CH_LOG_FOLDER + PATH_DELIM + BBSID + PATH_DELIM + FOLDER_INDEX_FILENAME;
 end;
 
 // ƒXƒŒ—§‚Ä‘—MURL
@@ -1666,7 +1666,7 @@ begin
 		Result := FilePath
 	else
 		Result := IncludeTrailingPathDelimiter( GikoSys.Setting.LogFolder )
-						+ BBS2CH_LOG_FOLDER + ParentBoard.BBSID + PATH_DELIM + FileName;
+						+ BBS2CH_LOG_FOLDER + PATH_DELIM + ParentBoard.BBSID + PATH_DELIM + FileName;
 end;
 
 procedure TThreadItem.SetLastModified(d: TDateTime);