Browse Source

* use "open" rather than xterm for poNewConsole on Darwin (patch by
Dmitry Boyarintsev, fixes mantis #14957)

git-svn-id: trunk@14000 -

Jonas Maebe 15 years ago
parent
commit
ab9980967f
1 changed files with 4 additions and 0 deletions
  1. 4 0
      packages/fcl-process/src/unix/process.inc

+ 4 - 0
packages/fcl-process/src/unix/process.inc

@@ -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