From 5df4b21165bf8d932e9787d2e67893ce44a09cd0 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Mon, 17 Dec 2018 09:29:12 +0100
Subject: [PATCH] fix #385 - "Verify project with D-Scanner" could use project
 ini config

---
 src/ce_main.pas | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/src/ce_main.pas b/src/ce_main.pas
index d2194ad3..370485ca 100644
--- a/src/ce_main.pas
+++ b/src/ce_main.pas
@@ -3988,6 +3988,7 @@ var
   pth: string;
   msg: string;
   i: integer;
+  c: string;
 begin
   if fProject = nil then
     exit;
@@ -4002,7 +4003,10 @@ begin
     prc.Options := [poUsePipes, poStderrToOutPut {$IFDEF WINDOWS}, poNewConsole{$ENDIF}];
     prc.ShowWindow:= swoHIDE;
     prc.Parameters.Add('-S');
-    if not fDscanUnittests then
+    c := fProject.basePath + 'dscanner.ini';
+    if c.fileExists then
+      prc.Parameters.Add('--config='+c)
+    else if not fDscanUnittests then
       prc.Parameters.Add('--skipTests');
     for i := 0 to fProject.sourcesCount-1 do
       prc.Parameters.Add(fProject.sourceAbsolute(i));