From 8c6db7bef0ac95c89ad16dafe8472ee762992635 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Sun, 12 Jul 2020 14:55:26 +0200
Subject: [PATCH] remove unused var and units

---
 src/u_dubproject.pas | 2 +-
 src/u_symlist.pas    | 4 +---
 src/u_todolist.pas   | 7 +++----
 3 files changed, 5 insertions(+), 8 deletions(-)

diff --git a/src/u_dubproject.pas b/src/u_dubproject.pas
index b9b93527..7fce6218 100644
--- a/src/u_dubproject.pas
+++ b/src/u_dubproject.pas
@@ -7,7 +7,7 @@ interface
 uses
   Classes, SysUtils, fpjson, jsonparser, jsonscanner, process, strutils,
   LazFileUtils, RegExpr, fgl,
-  u_common, u_interfaces, u_observer, u_dialogs, u_processes, u_projutils,
+  u_common, u_interfaces, u_observer, u_dialogs, u_processes,
   u_writableComponent, u_compilers, u_semver, u_stringrange;
 
 type
diff --git a/src/u_symlist.pas b/src/u_symlist.pas
index 1ec58edc..796233ae 100644
--- a/src/u_symlist.pas
+++ b/src/u_symlist.pas
@@ -8,7 +8,7 @@ uses
   Classes, SysUtils, TreeFilterEdit, Forms, Controls, Graphics, ExtCtrls, Menus,
   ComCtrls, u_widget, jsonparser, process, actnlist, Buttons, Clipbrd, LCLProc,
   u_common, u_observer, u_synmemo, u_interfaces, u_writableComponent,
-  u_processes, u_sharedres, u_dsgncontrols, u_dexed_d;
+  u_sharedres, u_dsgncontrols, u_dexed_d;
 
 type
 
@@ -117,8 +117,6 @@ type
     procedure TreeKeyPress(Sender: TObject; var Key: char);
   private
     fImages: TImageList;
-    fHasToolExe: boolean;
-    fToolExeName: string;
     fOptions: TSymbolListOptions;
     fSyms: TSymbolList;
     fMsgs: IMessagesDisplay;
diff --git a/src/u_todolist.pas b/src/u_todolist.pas
index f02c5399..7d944952 100644
--- a/src/u_todolist.pas
+++ b/src/u_todolist.pas
@@ -7,8 +7,7 @@ interface
 uses
   Classes, SysUtils, FileUtil, ListFilterEdit, Forms, Controls,
   strutils, Graphics, Dialogs, ExtCtrls, Menus, Buttons, ComCtrls,
-  syncobjs,
-  u_widget, process, u_common, u_interfaces, u_synmemo, u_processes,
+  u_widget, process, u_common, u_interfaces, u_synmemo,
   u_writableComponent, u_observer, u_sharedres, u_dexed_d,
   u_dsgncontrols;
 
@@ -434,9 +433,9 @@ begin
   c := getContext;
   case c of
     tcNone: exit;
-    tcProject: if fProj.isNotAssigned or fProj.sourcesCount.equals(0) then
+    tcProject: if (fProj = nil) or fProj.sourcesCount.equals(0) then
       exit;
-    tcFile: if fDoc.isNotAssigned then
+    tcFile: if fDoc = nil then
       exit;
   end;