mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-05 03:18:30 +02:00
IDE: made quoting command line parameters more unix friendly in an attempt to fix bug #11266)
git-svn-id: trunk@15153 -
This commit is contained in:
parent
b7864b218e
commit
b27ca6a892
@ -161,14 +161,12 @@ begin
|
||||
else
|
||||
FCmdLineParams.Add(Param);
|
||||
end;
|
||||
// make sure that all the values of the command line parameters are still
|
||||
// make sure that command line parameters are still
|
||||
// double quoted, if they contain spaces
|
||||
for i := 0 to FCmdLineParams.Count -1 do
|
||||
begin
|
||||
if pos(' ',FCmdLineParams.ValueFromIndex[i])>0 then
|
||||
begin
|
||||
FCmdLineParams.ValueFromIndex[i] := '"' + FCmdLineParams.ValueFromIndex[i] + '"';
|
||||
end;
|
||||
if pos(' ',FCmdLineParams[i])>0 then
|
||||
FCmdLineParams[i] := '"' + FCmdLineParams[i] + '"';
|
||||
end;
|
||||
end;
|
||||
|
||||
|
@ -9383,7 +9383,7 @@ procedure TMainIDE.DoRestart;
|
||||
end;
|
||||
StartLazProcess.CommandLine := ExeName
|
||||
+' --lazarus-pid='+IntToStr(GetProcessID)
|
||||
+' --primary-config-path="'+GetPrimaryConfigPath+'"';
|
||||
+' "--primary-config-path='+GetPrimaryConfigPath+'"';
|
||||
StartLazProcess.Execute;
|
||||
finally
|
||||
StartLazProcess.Free;
|
||||
|
Loading…
Reference in New Issue
Block a user