paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-06 00:30:34 +02:00
Code Issues Packages Projects Releases Wiki Activity

* use "open" rather than xterm for poNewConsole on Darwin (patch by

Browse Source 
Dmitry Boyarintsev, fixes mantis #14957)

git-svn-id: trunk@14000 -
This commit is contained in:
Jonas Maebe 2009-11-01 14:53:45 +00:00
parent c2e749797b
commit ab9980967f
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
packages/fcl-process/src/unix/process.inc
View File

@ -160,6 +160,9 @@ begin
CommandToList(Cmd,S);
if poNewConsole in P.Options then
begin
{$ifdef darwin}
S.Insert(0,'open');
{$else}
S.Insert(0,'-e');
If (P.ApplicationName<>'') then
begin
@ -172,6 +175,7 @@ begin
S.Insert(0,'-geometry');
end;
S.Insert(0,'xterm');
{$endif}
end;
if (P.ApplicationName<>'') then
begin