From 50977a8f9f59a7bfab3403d5a09e3efb33a9fb02 Mon Sep 17 00:00:00 2001
From: inoussa <inoussa@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Mon, 28 Jul 2008 17:43:01 +0000
Subject: [PATCH] debugging big!!!

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@512 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 wst/trunk/library_protocol.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/wst/trunk/library_protocol.pas b/wst/trunk/library_protocol.pas
index 18a3a9168..4da0c7e38 100644
--- a/wst/trunk/library_protocol.pas
+++ b/wst/trunk/library_protocol.pas
@@ -147,6 +147,7 @@ begin
     i := AResponse.Position;
     SetLength(s,AResponse.Size);
     AResponse.Read(s[1],AResponse.Size);
+    AResponse.Position := i;
     if IsConsole then
       WriteLn(s);
 {$ENDIF WST_DBG}