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

IDE: mouse settings for left gutter / Do not start selecting over [+]/[-] symbols. This interferes with hiding selected lines.

Browse Source 
git-svn-id: trunk@48274 -
This commit is contained in:
martin 2015-03-11 23:36:57 +00:00
parent 2e6ace8495
commit 0190617b21
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
ide/editoroptions.pp
View File

@ -3420,8 +3420,9 @@ begin
// TODO: why depend on FTextMiddleClick?
if FTextMiddleClick <> mbaNone then
AddCommand(emcCodeFoldCollaps, False, mbXMiddle, ccAny, CDir, R, [], [], emcoCodeFoldCollapsOne);
//if CDir = cdUp then
// AddCommand(emcNone, False, mbXLeft, ccAny, cdDown, [], []);
// do not allow selection, over colapse/expand icons. Those may depend cursor pos (e.g. hide selected lines)
if CDir = cdUp then
AddCommand(emcNone, False, mbXLeft, ccAny, cdDown, [], []);
end;
with FGutterActionsFoldExp do begin
AddCommand(emcCodeFoldCollaps, False, mbXLeft, ccAny, CDir, R, [], [SYNEDIT_LINK_MODIFIER], emcoCodeFoldCollapsOne);
@ -3429,8 +3430,9 @@ begin
// TODO: why depend on FTextMiddleClick?
if FTextMiddleClick <> mbaNone then
AddCommand(emcCodeFoldCollaps, False, mbXMiddle, ccAny, CDir, R, [], [], emcoCodeFoldCollapsOne);
//if CDir = cdUp then
// AddCommand(emcNone, False, mbXLeft, ccAny, cdDown, [], []);
// do not allow selection, over colapse/expand icons. Those may depend cursor pos (e.g. hide selected lines)
if CDir = cdUp then
AddCommand(emcNone, False, mbXLeft, ccAny, cdDown, [], []);
end;
end;