From ddd6428acec2b8c3e33a40578973a90cf10fdd2a Mon Sep 17 00:00:00 2001 From: wp_xxyyzz Date: Fri, 22 Mar 2019 23:09:44 +0000 Subject: [PATCH] lazmapviewer: Cosmetic changes git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6833 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/lazmapviewer/source/mvcache.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/components/lazmapviewer/source/mvcache.pas b/components/lazmapviewer/source/mvcache.pas index aeacecab3..6a0f53756 100644 --- a/components/lazmapviewer/source/mvcache.pas +++ b/components/lazmapviewer/source/mvcache.pas @@ -288,7 +288,7 @@ begin FileName := GetFileName(MapProvider, TileId); EnterCrit; try - idx := Cache.IndexOF(FileName); + idx := Cache.IndexOf(FileName); if idx <> -1 then Cache.Objects[idx].Free else @@ -304,7 +304,7 @@ begin if UseDisk then begin - if assigned(img) then + if Assigned(img) then begin lFile := TFileStream.Create(BasePath + FileName, fmCreate); try