mirror of https://gitlab.com/basile.b/dexed.git
fix more RT errors caused by fix for #307
This commit is contained in:
parent
0735cb6092
commit
d39b19b5d5
|
@ -282,7 +282,6 @@ type
|
|||
procedure patchClipboardIndentation;
|
||||
procedure gotoWordEdge(right: boolean);
|
||||
procedure handleModalBeginning(sender: TObject);
|
||||
procedure handleModalFinsihed(sender: TObject);
|
||||
//
|
||||
procedure gutterClick(Sender: TObject; X, Y, Line: integer; mark: TSynEditMark);
|
||||
procedure removeDebugTimeMarks;
|
||||
|
@ -1068,7 +1067,6 @@ begin
|
|||
fAutoCloseCurlyBrace:= autoCloseOnNewLineLexically;
|
||||
fAutoClosedPairs:= [autoCloseSquareBracket];
|
||||
|
||||
application.AddOnActivateHandler(@handleModalFinsihed);
|
||||
application.AddOnDeactivateHandler(@handleModalBeginning);
|
||||
|
||||
fDastWorxExename:= exeFullName('dastworx' + exeExt);
|
||||
|
@ -1136,11 +1134,6 @@ begin
|
|||
Font.Size := fDefaultFontSize;
|
||||
end;
|
||||
|
||||
procedure TCESynMemo.handleModalFinsihed(sender: TObject);
|
||||
begin
|
||||
cursor := crIBeam;
|
||||
end;
|
||||
|
||||
procedure TCESynMemo.handleModalBeginning(sender: TObject);
|
||||
begin
|
||||
cursor := crDefault;
|
||||
|
|
Loading…
Reference in New Issue