forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

update TODOs, either done or wontdo

This commit is contained in:
Basile Burg 2017-07-13 12:16:53 +02:00
parent d104b2651e
commit 11338909ce
No known key found for this signature in database
GPG Key ID: 1868039F415CB8CF
4 changed files with 2 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/ce_dmdwrap.pas
View File

@ -1261,7 +1261,6 @@ var
begin begin
if base.isNil then if base.isNil then
begin begin
// TODO-cCompilerPaths paths: add other options to CE proj format for the other comps
case compiler of case compiler of
dmd: lst := fDmdOthers; dmd: lst := fDmdOthers;
ldc, ldmd: lst := fLdcOthers; ldc, ldmd: lst := fLdcOthers;

2
src/ce_main.pas
View File

@ -1356,7 +1356,7 @@ begin
accept := GetKeyShiftState = [ssCtrl]; accept := GetKeyShiftState = [ssCtrl];
end; 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); procedure TCEMainForm.DockSplitterMw(Sender: TObject; Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);
var var
offs: integer; offs: integer;

1
src/ce_processes.pas
View File

@ -201,7 +201,6 @@ begin
if fDoneTerminated then exit; if fDoneTerminated then exit;
fDoneTerminated := true; 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 // note: made to fix a leak in the process used by the linter
// onTerminate is sometimes determined by an internal timer // onTerminate is sometimes determined by an internal timer
// and not the base method of TAsyncProcess (which usually unhooks) // and not the base method of TAsyncProcess (which usually unhooks)

4
src/ce_synmemo.pas
View File

@ -624,9 +624,7 @@ begin
fSelectionEnd := fMemo.SelEnd; fSelectionEnd := fMemo.SelEnd;
fFontSize := fMemo.Font.Size; fFontSize := fMemo.Font.Size;
TCEEditorHintWindow.FontSize := 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; prev := fMemo.Lines.Count-1;
for i := fMemo.Lines.Count-1 downto 0 do for i := fMemo.Lines.Count-1 downto 0 do
begin begin