X-Git-Url: http://git.osdn.net/view?a=blobdiff_plain;f=NewBoardURL.pas;h=417e27a80d946b31aaa22258256be129ddc73742;hb=ed262f6cd989d300228e6de1a3546e80dbbfa3f3;hp=841328944f2761f36303022fc2790f10b7aaa4ea;hpb=d04ee03ac82cc1a12f22df3d01ec8b122827de5d;p=gikonavigoeson%2Fgikonavi.git diff --git a/NewBoardURL.pas b/NewBoardURL.pas index 8413289..417e27a 100644 --- a/NewBoardURL.pas +++ b/NewBoardURL.pas @@ -103,8 +103,8 @@ begin IdHTTP.Request.CacheControl := 'no-cache'; IdHTTP.Request.CustomHeaders.Add('Pragma: no-cache'); IdHTTP.HandleRedirects := false; + IdAntiFreeze.Active := true; for i := 0 to URLs.Count - 1 do begin - IdAntiFreeze.Active := true; try ResStream.Clear; IdHTTP.Get(URLs[i], ResStream); @@ -134,9 +134,8 @@ begin {$ENDIF} end; end; - IdAntiFreeze.Active := false; end; - + IdAntiFreeze.Active := false; if (newURLs.Count > 0) and (oldURLs.Count > 0) then begin ReplaceURLs(oldURLs, newURLs); GikoForm.FavoritesURLReplace(oldURLs, newURLs);