From 4b6cfc8b3118542fb37363a22ab866f3fc985966 Mon Sep 17 00:00:00 2001 From: mysticbbs Date: Sun, 26 Feb 2012 06:51:40 -0500 Subject: [PATCH] Fix for buffed file open --- mdl/m_fileio.pas | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/mdl/m_fileio.pas b/mdl/m_fileio.pas index f11155b..1fa16ea 100644 --- a/mdl/m_fileio.pas +++ b/mdl/m_fileio.pas @@ -457,20 +457,20 @@ Begin Case OM of fmOpen : Begin - System.Reset(BufFile, 1); + {$I-} System.Reset(BufFile, 1); {$I+} If System.IoResult <> 0 Then Exit; FillBuffer; End; fmOpenCreate: Begin - System.Reset(BufFile, 1); + {$I-} System.Reset(BufFile, 1); {$I+} If System.IoResult <> 0 Then Begin - System.ReWrite(BufFile, 1); + {$I-} System.ReWrite(BufFile, 1); {$I+} If System.IoResult <> 0 Then Exit; End Else FillBuffer; End; fmCreate : Begin - System.ReWrite(BufFile, 1); + {$I-} System.ReWrite(BufFile, 1); {$I+} If IoResult <> 0 Then Exit; End; End;