mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-12-11 08:20:31 +01:00
SynEdit: Fold-context-Menu, fix crash for right click at lines without fold
git-svn-id: trunk@19549 -
This commit is contained in:
parent
ae6e3689e1
commit
c14b8611f4
@ -2647,6 +2647,7 @@ end;
|
||||
|
||||
function TCustomSynEdit.GetPopupMenu: TPopupMenu;
|
||||
begin
|
||||
Result := nil;
|
||||
if (sfGutterClick in fStateFlags) and FGutter.HasCustomPopupMenu(Result) then
|
||||
exit;
|
||||
Result := inherited GetPopupMenu;
|
||||
|
||||
Loading…
Reference in New Issue
Block a user