eric
/
mysticbbs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Updates

This commit is contained in:
mysticbbs 2013-03-24 16:23:27 -04:00
parent d135f2fe5d
commit 4769f98125
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
mdl/m_protocol_binkp.pas
View File

@ -458,6 +458,11 @@ Begin
If RxCommand = M_GOT Then Begin If RxCommand = M_GOT Then Begin
HaveHeader := False; HaveHeader := False;
NeedHeader := True; NeedHeader := True;
FileList.QData[FileList.QPos].Status := QueueSuccess;
FileErase (FileList.QData[FileList.QPos].FilePath + FileList.QData[FileList.QPos].FileName);
TxState := TxNextFile; TxState := TxNextFile;
End; End;
End; End;