@@ -828,7 +828,7 @@ end;
{$IFDEF OS_AMIGA}
begin
{ AmigaOS Delay() wait's argument in 1/50 seconds }
- DOSLib.Delay (5);
+ DOSLib.Delay(2);
end;
{$ENDIF OS_AMIGA}
@@ -78,7 +78,11 @@ const
{$ifdef Unix}
AllFiles = '*';
{$else}
- AllFiles = '*.*';
+ {$ifdef OS_AMIGA}
+ AllFiles = '*';
+ {$else}
+ AllFiles = '*.*';
+ {$endif}
{$endif}
type