From: yoffy Date: Tue, 13 Apr 2004 11:34:23 +0000 (+0000) Subject: ・移転した板のお気に入りが正しく更新されないバグを修正。 X-Git-Tag: v1_64_1_820~1260 X-Git-Url: http://git.osdn.net/view?a=commitdiff_plain;h=121071f2fce90a7a755bedf43947149fed69e075;p=gikonavigoeson%2Fgikonavi.git ・移転した板のお気に入りが正しく更新されないバグを修正。 --- diff --git a/Favorite.pas b/Favorite.pas index 1efbc24..2110a74 100644 --- a/Favorite.pas +++ b/Favorite.pas @@ -127,7 +127,7 @@ begin tmpURL := URL; GikoSys.ParseURI( tmpURL, protocol, host, path, document, port, bookmark ); if GikoSys.Is2chHost( host ) then begin - GikoSys.Parse2chURL( tmpURL, path, document, BBSID, BBSKey ); + BBSID := GikoSys.URLToID( tmpURL ); FItem := BBSs[ 0 ].FindBBSID( BBSID ); if FItem <> nil then URL := FItem.URL;