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

dscanner ini file may rather start with a dot

This commit is contained in:
Basile Burg 2018-12-19 06:12:06 +01:00
parent 5f7a5c5718
commit ed8853ccc2
1 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/ce_main.pas
View File

@ -3988,7 +3988,8 @@ var
pth: string; pth: string;
msg: string; msg: string;
i: integer; i: integer;
c: string; s1: string;
s2: string;
begin begin
if fProject = nil then if fProject = nil then
exit; exit;
@ -4003,9 +4004,12 @@ 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');
c := fProject.basePath + 'dscanner.ini'; s1 := fProject.basePath + 'dscanner.ini';
if c.fileExists then s2 := fProject.basePath + '.dscanner.ini';
prc.Parameters.Add('--config='+c) if s1.fileExists then
prc.Parameters.Add('--config='+s1)
else if s2.fileExists then
prc.Parameters.Add('--config='+s2)
else if not fDscanUnittests then 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