mirror of https://gitlab.com/basile.b/dexed.git
fix #385 - "Verify project with D-Scanner" could use project ini config
This commit is contained in:
parent
f640a33bed
commit
5df4b21165
|
@ -3988,6 +3988,7 @@ var
|
||||||
pth: string;
|
pth: string;
|
||||||
msg: string;
|
msg: string;
|
||||||
i: integer;
|
i: integer;
|
||||||
|
c: string;
|
||||||
begin
|
begin
|
||||||
if fProject = nil then
|
if fProject = nil then
|
||||||
exit;
|
exit;
|
||||||
|
@ -4002,7 +4003,10 @@ begin
|
||||||
prc.Options := [poUsePipes, poStderrToOutPut {$IFDEF WINDOWS}, poNewConsole{$ENDIF}];
|
prc.Options := [poUsePipes, poStderrToOutPut {$IFDEF WINDOWS}, poNewConsole{$ENDIF}];
|
||||||
prc.ShowWindow:= swoHIDE;
|
prc.ShowWindow:= swoHIDE;
|
||||||
prc.Parameters.Add('-S');
|
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');
|
prc.Parameters.Add('--skipTests');
|
||||||
for i := 0 to fProject.sourcesCount-1 do
|
for i := 0 to fProject.sourcesCount-1 do
|
||||||
prc.Parameters.Add(fProject.sourceAbsolute(i));
|
prc.Parameters.Add(fProject.sourceAbsolute(i));
|
||||||
|
|
Loading…
Reference in New Issue