mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-22 00:09:25 +02:00
+ minor Amiga/MorphOS FV tweaks:
* GiveUpTimeSlice() now Sleep()s for shorter time * Amiga "all files" are "*" and not "*.*", this fixes file dialogs somewhat git-svn-id: trunk@11970 -
This commit is contained in:
parent
f19e69e7e8
commit
d135a2d9ea
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user