paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-03 03:20:50 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: fixed restarting lazarus

Browse Source 
git-svn-id: trunk@15778 -
This commit is contained in:
vincents 2008-07-14 11:24:07 +00:00
parent 23d97dd378
commit 91146521fe
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ide/main.pp
View File

@ -9441,14 +9441,14 @@ procedure TMainIDE.DoRestart;
' --lazarus-pid='+IntToStr(GetProcessID) + ' ' +
GetCommandLineParameters(Params, False);
//DebugLn('CommandLine 1 : %s', [StartLazProcess.CommandLine]);
DebugLn('CommandLine 1 : %s', [StartLazProcess.CommandLine]);
if (pos(PrimaryConfPathOptLong, StartLazProcess.CommandLine) = 0) and
(pos(PrimaryConfPathOptShort, StartLazProcess.CommandLine) = 0) then
StartLazProcess.CommandLine := StartLazProcess.CommandLine +
' "' + PrimaryConfPathOptLong + '='+GetPrimaryConfigPath+'"';
' "' + PrimaryConfPathOptLong + GetPrimaryConfigPath+'"';
//DebugLn('CommandLine 2 : %s', [StartLazProcess.CommandLine]);
DebugLn('CommandLine 2 : %s', [StartLazProcess.CommandLine]);
StartLazProcess.Execute;
finally