mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-14 10:39:18 +02:00
SynEdit: Fixed Option for MouseLink (when not using MouseActions) / ssMeta on MAc
git-svn-id: trunk@49210 -
This commit is contained in:
parent
8c08115db1
commit
649ab6c422
@ -175,7 +175,7 @@ begin
|
|||||||
|
|
||||||
if not (emUseMouseActions in TCustomSynEdit(SynEdit).MouseOptions) then begin
|
if not (emUseMouseActions in TCustomSynEdit(SynEdit).MouseOptions) then begin
|
||||||
Result := (emShowCtrlMouseLinks in TCustomSynEdit(SynEdit).MouseOptions) and
|
Result := (emShowCtrlMouseLinks in TCustomSynEdit(SynEdit).MouseOptions) and
|
||||||
(AShift * [ssShift, ssCtrl, ssAlt] = [ssCtrl]);
|
(AShift * ([ssShift, ssCtrl, ssAlt] + [SYNEDIT_LINK_MODIFIER]) = [SYNEDIT_LINK_MODIFIER]);
|
||||||
exit;
|
exit;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user