Преглед изворни кода

Amiga: fix fp.dsk saving

git-svn-id: trunk@35399 -
marcus пре 8 година
родитељ
комит
8e123e7b37
1 измењених фајлова са 3 додато и 0 уклоњено
  1. 3 0
      ide/wresourc.pas

+ 3 - 0
ide/wresourc.pas

@@ -780,6 +780,9 @@ begin
       Fail;
     End;
   MyStream:=true;
+  {$ifdef HASAMIGA}
+  Flush;
+  {$endif}
 end;
 
 constructor TResourceFile.LoadFile(AFileName: string);