From 8f31a9a9c81ebb89441cd8dc9cb38339cdcbffb2 Mon Sep 17 00:00:00 2001
From: marco <marco@freepascal.org>
Date: Sat, 22 Nov 2003 21:58:09 +0000
Subject: [PATCH]  * johill changed his mind

---
 rtl/inc/sockets.inc | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/rtl/inc/sockets.inc b/rtl/inc/sockets.inc
index 1779786ad3..d1f895f445 100644
--- a/rtl/inc/sockets.inc
+++ b/rtl/inc/sockets.inc
@@ -83,7 +83,7 @@ begin
   TextRec(SockOut).InOutFunc:=@IOSock;
   TextRec(SockOut).FlushFunc:=@FlushSock;
   TextRec(SockOut).CloseFunc:=@CloseSock;
-  TextRec(SockOut).Mode := fmAppend;
+  TextRec(SockOut).Mode := fmOutput;
 end;
 
 
@@ -172,7 +172,10 @@ begin
 end;
 {
   $Log$
-  Revision 1.9  2003-11-22 10:59:58  marco
+  Revision 1.10  2003-11-22 21:58:09  marco
+   * johill changed his mind
+
+  Revision 1.9  2003/11/22 10:59:58  marco
    fix for last one
 
   Revision 1.8  2003/11/22 10:33:38  marco