MIS telnet linux updates

This commit is contained in:
mysticbbs 2012-03-10 03:49:11 -05:00
parent 684c6cf767
commit 7320e3db69
1 changed files with 5 additions and 2 deletions

View File

@ -10,6 +10,7 @@ Uses
Classes,
Process,
SysUtils,
m_FileIO,
{$ENDIF}
{$IFDEF WINDOWS}
Windows,
@ -142,11 +143,13 @@ Begin
If bWrite > 0 Then
Proc.Input.Write(Buffer, bWrite);
End Else
Sleep(25);
Sleep(10);
End;
Proc.Free;
FileErase (bbsConfig.DataPath + 'chat' + strI2S(NI.Num) + '.dat');
NI.Busy := False;
NI.IP := '';
NI.User := '';
@ -161,4 +164,4 @@ Begin
Inherited Destroy;
End;
End.
End.