ctrl+x & ctrl+v works on the whole line when no selection, close #272

This commit is contained in:
Basile Burg 2018-03-28 10:01:14 +02:00
parent ba16d4cc42
commit ad9276ef62
1 changed files with 10 additions and 0 deletions

View File

@ -1284,6 +1284,16 @@ procedure TCESynMemo.DoOnProcessCommand(var Command: TSynEditorCommand;
begin
inherited;
case Command of
ecCut: if not SelAvail then
begin
SelectLine(false);
ExecuteCommand(ecCut, #0, nil);
end;
ecCopy: if not SelAvail then
begin
SelectLine(false);
ExecuteCommand(ecCopy, #0, nil);
end;
ecPaste: patchClipboardIndentation;
ecCompletionMenu:
begin