paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-16 04:19:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

lazbuild: fixed compile an ide when clean all is set

Browse Source
This commit is contained in:
mattias 2022-12-01 23:48:25 +01:00
parent 4022919f1a
commit c9c3d54bf2
1 changed files with 13 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
ide/buildlazdialog.pas
View File

@ -393,8 +393,20 @@ var
end;
function Run(CurTitle: string): TModalResult;
var
Cmds: TStrings;
begin
AddCmdLineParam(Cmd,false);
if Pos(' ',Cmd)>0 then
begin
Cmds:=TStringList.Create;
try
SplitCmdLineParams(Cmd,Cmds);
CmdLineParams.AddStrings(Cmds);
finally
Cmds.Free;
end;
end else
CmdLineParams.Add(Cmd);
Tool:=ExternalToolList.Add(CurTitle);
Tool.Reference(Self,ClassName);
try