paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-18 21:42:51 +02:00
Code Issues Packages Projects Releases Wiki Activity

SynGutter OverView: Fixed crash, due to missing unregister on destroy

Browse Source 
git-svn-id: trunk@28453 -
This commit is contained in:
martin 2010-11-24 13:56:01 +00:00
parent 38deafba9a
commit 0bae937f35
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
components/synedit/syngutterlineoverview.pp
View File

@ -1196,6 +1196,7 @@ end;
destructor TSynGutterLOvProviderBookmarks.Destroy; destructor TSynGutterLOvProviderBookmarks.Destroy;
begin begin
TSynEditStringList(TextBuffer).RemoveHanlders(self);
TSynEdit(SynEdit).Marks.UnRegisterChangeHandler({$IFDEF FPC}@{$ENDIF}DoMarkChange); TSynEdit(SynEdit).Marks.UnRegisterChangeHandler({$IFDEF FPC}@{$ENDIF}DoMarkChange);
inherited Destroy; inherited Destroy;
end; end;