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

fix, config & buildType passed to DUB, "plain" was never passed

This commit is contained in:
Basile Burg 2015-11-10 15:41:47 +01:00
parent 87d07d42a2
commit 7800c0d821
1 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
src/ce_dubproject.pas
View File

@ -85,13 +85,15 @@ type
// returns true if filename is a valid dub project. Only json format is supported.
function isValidDubProject(const filename: string): boolean;
implementation
const
DubBuiltTypeName: array[TDubBuildType] of string = ('plain', 'debug', 'release',
'unittest', 'docs', 'ddox', 'profile', 'cov', 'unittest-cov'
);
implementation
DubDefaultConfigName = '(default config)';
{$REGION Standard Comp/Obj -----------------------------------------------------}
constructor TCEDubProject.create(aOwner: TComponent);
@ -232,9 +234,8 @@ begin
try
str.Add('dub' + exeExt);
str.Add('build');
if fBuiltTypeIx <> 0 then
str.Add('--build=' + fBuildTypes.Strings[fBuiltTypeIx]);
if fConfigIx <> 0 then
str.Add('--build=' + fBuildTypes.Strings[fBuiltTypeIx]);
if (fConfigs.Count <> 1) and (fConfigs.Strings[0] <> DubDefaultConfigName) then
str.Add('--config=' + fConfigs.Strings[fConfigIx]);
result := str.Text;
finally
@ -369,9 +370,8 @@ begin
dubproc.Parameters.Add('build')
else
dubproc.Parameters.Add('run');
if fBuiltTypeIx <> 0 then
dubproc.Parameters.Add('--build=' + fBuildTypes.Strings[fBuiltTypeIx]);
if fConfigIx <> 0 then
dubproc.Parameters.Add('--build=' + fBuildTypes.Strings[fBuiltTypeIx]);
if (fConfigs.Count <> 1) and (fConfigs.Strings[0] <> DubDefaultConfigName) then
dubproc.Parameters.Add('--config=' + fConfigs.Strings[fConfigIx]);
if run and (runArgs <> '') then
dubproc.Parameters.Add('--' + runArgs);
@ -465,7 +465,7 @@ begin
end;
end else
begin
fConfigs.Add('(dub default)');
fConfigs.Add(DubDefaultConfigName);
// default = what dub set as 'application' or 'library'
// in this case Coedit will pass only the type to DUB: 'DUB --build=release'
end;