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

synedit: invalidate gutter when we add/remove debug marks

Browse Source 
git-svn-id: trunk@18996 -
This commit is contained in:
paul 2009-03-15 06:10:47 +00:00
parent 4be10e123f
commit 0b6b0bc4ea
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/synedit/synedit.pp
View File

@ -5003,11 +5003,13 @@ end;
procedure TCustomSynEdit.SetDebugMarks(AFirst, ALast: Integer);
begin
TSynEditStringList(fLines).SetDebugMarks(AFirst, ALast);
InvalidateGutterLines(AFirst, ALast);
end;
procedure TCustomSynEdit.ClearDebugMarks;
begin
TSynEditStringList(fLines).ClearDebugMarks;
InvalidateGutter;
end;
procedure TCustomSynEdit.UndoItem;