From ad9276ef6295336f1b9c75e3fa979fc9b4f5d4fb Mon Sep 17 00:00:00 2001 From: Basile Burg Date: Wed, 28 Mar 2018 10:01:14 +0200 Subject: [PATCH] ctrl+x & ctrl+v works on the whole line when no selection, close #272 --- src/ce_synmemo.pas | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/src/ce_synmemo.pas b/src/ce_synmemo.pas index 93b088f3..dceb6905 100644 --- a/src/ce_synmemo.pas +++ b/src/ce_synmemo.pas @@ -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