From 11338909cee6847c4c91418c7d010b31b15d0b1a Mon Sep 17 00:00:00 2001 From: Basile Burg Date: Thu, 13 Jul 2017 12:16:53 +0200 Subject: [PATCH] update TODOs, either done or wontdo --- src/ce_dmdwrap.pas | 1 - src/ce_main.pas | 2 +- src/ce_processes.pas | 1 - src/ce_synmemo.pas | 4 +--- 4 files changed, 2 insertions(+), 6 deletions(-) diff --git a/src/ce_dmdwrap.pas b/src/ce_dmdwrap.pas index 2f670364..c112e1da 100644 --- a/src/ce_dmdwrap.pas +++ b/src/ce_dmdwrap.pas @@ -1261,7 +1261,6 @@ var begin if base.isNil then begin - // TODO-cCompilerPaths paths: add other options to CE proj format for the other comps case compiler of dmd: lst := fDmdOthers; ldc, ldmd: lst := fLdcOthers; diff --git a/src/ce_main.pas b/src/ce_main.pas index 292eff8d..cb48093f 100644 --- a/src/ce_main.pas +++ b/src/ce_main.pas @@ -1356,7 +1356,7 @@ begin accept := GetKeyShiftState = [ssCtrl]; end; -//TODO-cdocking: remove the usage of TAnchorDockSplitterEx from Laz 1.8 RC1 (OnMouseWheel public) +//TODO-cdocking: remove the usage of TAnchorDockSplitterEx from Laz 1.8 (OnMouseWheel public) procedure TCEMainForm.DockSplitterMw(Sender: TObject; Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean); var offs: integer; diff --git a/src/ce_processes.pas b/src/ce_processes.pas index a0f9a103..d084cd67 100644 --- a/src/ce_processes.pas +++ b/src/ce_processes.pas @@ -201,7 +201,6 @@ begin if fDoneTerminated then exit; fDoneTerminated := true; - // TODO-cbugfix: check that manual unhooking isn't an issue // note: made to fix a leak in the process used by the linter // onTerminate is sometimes determined by an internal timer // and not the base method of TAsyncProcess (which usually unhooks) diff --git a/src/ce_synmemo.pas b/src/ce_synmemo.pas index a5511325..9319c035 100644 --- a/src/ce_synmemo.pas +++ b/src/ce_synmemo.pas @@ -624,9 +624,7 @@ begin fSelectionEnd := fMemo.SelEnd; fFontSize := fMemo.Font.Size; TCEEditorHintWindow.FontSize := fMemo.Font.Size; - // - // TODO-cimprovment: handle nested folding in TCESynMemoCache - // cf. other ways: http://forum.lazarus.freepascal.org/index.php?topic=26748.msg164722#msg164722 + prev := fMemo.Lines.Count-1; for i := fMemo.Lines.Count-1 downto 0 do begin