use the new HASAMIGA instead of the non-existing AmigaShell

git-svn-id: trunk@26124 -
This commit is contained in:
Károly Balogh 2013-11-24 01:22:07 +00:00
parent da3603e663
commit ba89914471

View File

@ -1546,18 +1546,18 @@ end;
result := Unix.fpsystem(command);
end;
{$else hasunix}
{$ifdef amigashell}
{$ifdef hasamiga}
begin
result := RequotedExecuteProcess('',command);
end;
{$else amigashell}
{$else hasamiga}
var
comspec : string;
begin
comspec:=GetEnvironmentVariable('COMSPEC');
result := RequotedExecuteProcess(comspec,' /C '+command);
end;
{$endif amigashell}
{$endif hasamiga}
{$endif hasunix}