From d9e78661d368ce337e513d0081b8773d89460306 Mon Sep 17 00:00:00 2001
From: mysticbbs <mysticbbs@gmail.com>
Date: Sat, 14 Jul 2012 15:04:10 -0400
Subject: [PATCH] Moved blocking check to sockets class

---
 mystic/bbs_io.pas | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/mystic/bbs_io.pas b/mystic/bbs_io.pas
index 7ac7e2e..d2f58d8 100644
--- a/mystic/bbs_io.pas
+++ b/mystic/bbs_io.pas
@@ -195,10 +195,11 @@ Begin
     If Not TBBSCore(Core).LocalMode Then Begin
       Res := TBBSCore(Core).Client.WriteBuf(OutBuffer, OutBufPos);
 
+      (* Moved to m_sockets_class 1.10a14
       While (Res = -1) and (WSAGetLastError = EWOULDBLOCK) Do Begin
         WaitMS(10);
         Res := TBBSCore(Core).Client.WriteBuf(OutBuffer, OutBufPos);
-      End;
+      End;*)
     End;
 
     OutBufPos := 0;