From e1ce033a0878a5476cdf66006588b621da41660e Mon Sep 17 00:00:00 2001
From: yoffy <yoffy>
Date: Sun, 30 Nov 2003 07:51:08 +0000
Subject: [PATCH] =?utf8?q?=E3=83=BB=E4=BB=8A=E3=81=BE=E3=81=A7=E3=82=B3?=
 =?utf8?q?=E3=83=B3=E3=82=B9=E3=83=88=E3=83=A9=E3=82=AF=E3=82=BF=E3=82=92?=
 =?utf8?q?=E5=91=BC=E3=81=B3=E5=87=BA=E3=81=99=E5=81=B4=E3=81=AB=20URL=20?=
 =?utf8?q?=E3=81=AE=E6=95=B4=E5=BD=A2=E3=82=92=E3=81=95=E3=81=9B=E3=81=A6?=
 =?utf8?q?=E3=81=84=E3=81=9F=E3=81=8C=E3=80=81=20=E3=80=80=E3=81=A9?=
 =?utf8?q?=E3=82=93=E3=81=AA=E5=85=A5=E5=8A=9B=E3=81=8C=E6=9D=A5=E3=81=A6?=
 =?utf8?q?=E3=82=82=E3=82=B9=E3=83=AC=E3=83=83=E3=83=89=E3=81=AE=20URL=20?=
 =?utf8?q?=E3=81=8C=E4=B8=80=E6=84=8F=E3=81=AB=E3=81=AA=E3=82=8B=E3=82=88?=
 =?utf8?q?=E3=81=86=E3=81=AB=E3=82=AF=E3=83=A9=E3=82=B9=E5=81=B4=E3=81=A7?=
 =?utf8?q?=E6=95=B4=E5=BD=A2=E3=81=99=E3=82=8B=E3=82=88=E3=81=86=E3=81=AB?=
 =?utf8?q?=E3=81=AA=E3=81=A3=E3=81=9F=E3=80=82=20=E3=83=BB=E3=82=B9?=
 =?utf8?q?=E3=83=AC=E3=83=83=E3=83=89=E3=81=AE=20URL=20=E3=81=AF=E3=80=81T?=
 =?utf8?q?ThreadItem=20=E3=82=AF=E3=83=A9=E3=82=B9=E3=81=AE=E4=BF=9D?=
 =?utf8?q?=E6=8C=81=E3=81=97=E3=81=A6=E3=81=84=E3=82=8B=20URL=20=E3=81=8C?=
 =?utf8?q?=E5=AE=8C=E5=85=A8(=E7=9C=81=E7=95=A5=E3=81=95=E3=82=8C=E3=81=A6?=
 =?utf8?q?=E3=81=84=E3=81=AA=E3=81=84)=20=E3=80=80URL=20=E3=81=AA=E3=81=AE?=
 =?utf8?q?=E3=81=A7=E3=80=81FindThreadFromURl=20=E3=81=A7=E6=89=B1?=
 =?utf8?q?=E3=81=86=20Pos=20=E3=81=AE=E5=BC=95=E6=95=B0=E3=81=A8=E3=81=97?=
 =?utf8?q?=E3=81=A6=E3=81=AF=E9=80=86=E3=81=AB=E3=81=AA=E3=82=8B=E3=81=B9?=
 =?utf8?q?=E3=81=8D=E3=81=AA=E3=81=AE=E3=81=A7=E4=BF=AE=E6=AD=A3=E3=80=82?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 BoardGroup.pas | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/BoardGroup.pas b/BoardGroup.pas
index 5c33b11..ca09d7a 100644
--- a/BoardGroup.pas
+++ b/BoardGroup.pas
@@ -942,7 +942,7 @@ var
 begin
 	Result := -1;
 	for i := 0 to Count - 1 do begin
-		if Items[i].URL = URL then begin
+		if Pos( URL, Items[ i ].URL ) = 1 then begin
 			Result := i;
 			Exit;
 		end;
@@ -958,7 +958,7 @@ begin
 		GikoSys.ReadSubjectFile( Self );
 		
 	for i := Count - 1 downto 0 do begin
-		if Pos( Items[ i ].URL, inURL ) = 1 then begin
+		if Pos( inURL, Items[ i ].URL ) = 1 then begin
 			Result := Items[ i ];
 			Exit;
 		end;
@@ -1398,6 +1398,7 @@ begin
 					EXTERNAL_LOG_FOLDER + PATH_DELIM + host + PATH_DELIM + BBSID + PATH_DELIM + BBSKey + '.dat';
 			FileName	:= BBSKey + '.dat';
 			IsLogFile	:= FileExists( FilePath );
+			URL				:= GikoSys.Get2chBrowsableThreadURL( inURL );
 		end;
 	end else begin
 		// ƒvƒ‰ƒOƒCƒ“‚É TThreadItem ‚ªì¬‚³‚ꂽ‚±‚Æ‚ð“`‚¦‚é
-- 
2.11.0