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

chmhelp: less hints

Browse Source 
git-svn-id: trunk@53146 -
This commit is contained in:
mattias 2016-10-17 13:56:45 +00:00
parent f613ed6239
commit 23483185bf
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/chmhelp/packages/help/lhelpcontrol.pas
View File

@ -228,14 +228,14 @@ begin
begin begin
// application bundle // application bundle
// to put lhelp into the foreground, use "open -n" // to put lhelp into the foreground, use "open -n"
Cmd:='/usr/bin/open -n '+ServerEXE+' --args --ipcname ' + NameForServer Cmd:='/usr/bin/open -n '+ServerEXE+' --args --ipcname ' + NameForServer;
end; end;
{$ENDIF} {$ENDIF}
with TProcessUTF8.Create(nil) do with TProcessUTF8.Create(nil) do
begin begin
InheritHandles := false; InheritHandles := false;
ShowWindow:=swoShowNormal; ShowWindow:=swoShowNormal;
CommandLine := Cmd; ParseCmdLine(Cmd);
debugln('TLHelpConnection.StartHelpServer: going to start help server by executing '+Cmd); debugln('TLHelpConnection.StartHelpServer: going to start help server by executing '+Cmd);
Execute; Execute;
Free; Free;