mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-01 00:12:35 +02:00
started loading/saving breakpoints
git-svn-id: trunk@3086 -
This commit is contained in:
parent
0bff9f505f
commit
9aa716cf88
@ -938,6 +938,16 @@ begin
|
||||
if FaOwner<>nil then
|
||||
TSourceNotebook(FaOwner).AddJumpPointClicked(Self);
|
||||
end;
|
||||
|
||||
ecCopy:
|
||||
begin
|
||||
if (not FEditor.SelAvail) then begin
|
||||
// nothing selected
|
||||
if EditorOpts.CopyWordAtCursorOnCopyNone then begin
|
||||
FEditor.SetSelWord;
|
||||
end;
|
||||
end;
|
||||
end;
|
||||
|
||||
else
|
||||
if (CurCompletionControl<>nil)
|
||||
|
Loading…
Reference in New Issue
Block a user