From 0ebbf78a0357e12d7b005ad7e4de122a9a991b39 Mon Sep 17 00:00:00 2001
From: mysticbbs <mysticbbs@gmail.com>
Date: Wed, 28 Aug 2013 18:31:01 -0400
Subject: [PATCH] Nonsense

---
 mdl/m_socket_server.pas | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/mdl/m_socket_server.pas b/mdl/m_socket_server.pas
index 9839808..f2c44fb 100644
--- a/mdl/m_socket_server.pas
+++ b/mdl/m_socket_server.pas
@@ -210,19 +210,19 @@ Begin
     If (ClientMax > 0) And (ClientActive >= ClientMax) Then Begin
       Inc (ClientRefused);
       Status ('BUSY: ' + NewClient.PeerIP + ' (' + NewClient.PeerName + ')');
-      If Not NewClient.WriteFile(TextPath + 'busy.txt') Then NewClient.WriteLine('BUSY');
+      If Not NewClient.WriteFile('', TextPath + 'busy.txt') Then NewClient.WriteLine('BUSY');
       NewClient.Free;
     End Else
     If IsBlockedIP(NewClient) Then Begin
       Inc (ClientBlocked);
       Status('BLOCK: ' + NewClient.PeerIP + ' (' + NewClient.PeerName + ')');
-      If Not NewClient.WriteFile(TextPath + 'blocked.txt') Then NewClient.WriteLine('BLOCKED');
+      If Not NewClient.WriteFile('', TextPath + 'blocked.txt') Then NewClient.WriteLine('BLOCKED');
       NewClient.Free;
     End Else
     If (ClientMaxIPs > 0) and (DuplicateIPs(NewClient) > ClientMaxIPs) Then Begin
       Inc (ClientRefused);
       Status('MULTI: ' + NewClient.PeerIP + ' (' + NewClient.PeerName + ')');
-      If Not NewClient.WriteFile(TextPath + 'dupeip.txt') Then NewClient.WriteLine('Only ' + strI2S(ClientMaxIPs) + ' connection(s) per user');
+      If Not NewClient.WriteFile('', TextPath + 'dupeip.txt') Then NewClient.WriteLine('Only ' + strI2S(ClientMaxIPs) + ' connection(s) per user');
       NewClient.Free;
     End Else Begin
       Inc (ClientTotal);