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