paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-16 03:00:30 +01:00
Code Issues Packages Projects Releases Wiki Activity

carbon: fix compilation

Browse Source 
git-svn-id: trunk@25493 -
This commit is contained in:
dmitry 2010-05-18 07:23:52 +00:00
parent 94774d56fb
commit 05761502a7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/carbon/carbonprivatecommon.inc
View File

@ -100,7 +100,7 @@ begin
finally
Dispose(AStruct);
end;
if AWidget.HasCaret then DrawCaret(AWidget);
if AWidget.HasCaret then DrawCaret;
// resetting clip region for the next paint
TCarbonControlContext(AWidget.Context).SetClipRegion(nil, 0);