forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fix autoCallCompletion problem and annoyance 

- dont trigger the feature when using accelerators
- allow in non-D sources if textCompletions are active
This commit is contained in:
Basile Burg 2022-06-06 20:53:50 +02:00
parent 04138ddd63
commit f90d246933
2 changed files with 10 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
CHANGELOG.md
View File

@ -7,6 +7,11 @@
- Completion, while menu opened, <key>Backspace</key> had for effect to also delete next char.
This was an old workaround that has no reason to be maintained anymore.
## Bugs fixed
- Completion, option `autoCallCompletion` did not work when using `textCompletion` in non-D sources.
- Completion, does not allow `autoCallCompletion` when key modifiers are used, e.g <key>CTRL</key>+<key>Z</key>.
# v3.9.18
## Enhancements

9
src/u_synmemo.pas
View File

@ -3704,11 +3704,12 @@ begin
VK_OEM_PERIOD, VK_DECIMAL: fCanAutoDot := (fLastUp <> VK_OEM_PERIOD) and (fLastUp <> VK_DECIMAL);
end;
inherited;
if fAutoCallCompletion and fIsDSource and (not fCompletion.IsActive) and
(Key < $80) and (char(Key) in ['a'..'z', 'A'..'Z', '_']) then
if fAutoCallCompletion and (fIsDSource or textCompletion or alwaysAdvancedFeatures) and
(not fCompletion.IsActive) and (Key < $80) and (char(Key) in ['a'..'z', 'A'..'Z', '_']) then
begin
fCompletion.Execute(GetWordAtRowCol(LogicalCaretXY),
ClientToScreen(point(CaretXPix, CaretYPix + LineHeight)));
if Shift = [] then
fCompletion.Execute(GetWordAtRowCol(LogicalCaretXY),
ClientToScreen(point(CaretXPix, CaretYPix + LineHeight)));
end;
if (Key = VK_BACK) and fCallTipWin.Visible then
showCallTips(true);