From 132cc4c0ffce34000f02a0662463c263383e8b91 Mon Sep 17 00:00:00 2001
From: inoussa <inoussa@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Wed, 25 Mar 2015 17:29:31 +0000
Subject: [PATCH] Synapse HTTP protocol's header management fix (Thanks mcarro)

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4067 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 wst/trunk/synapse_http_protocol.pas | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/wst/trunk/synapse_http_protocol.pas b/wst/trunk/synapse_http_protocol.pas
index 957a0fbd8..efdc547e6 100644
--- a/wst/trunk/synapse_http_protocol.pas
+++ b/wst/trunk/synapse_http_protocol.pas
@@ -199,7 +199,7 @@ begin
   if (i >= 0) then
     FConnection.Headers[i] := s
   else
-    FConnection.Headers.Add(s);
+    FConnection.Headers.Insert(0,s);
 end;
 
 procedure THTTPTransport.DoSendAndReceive(ARequest, AResponse : TStream);
@@ -229,6 +229,7 @@ begin
   end;
   AResponse.CopyFrom(FConnection.Document,0);
   FConnection.Document.Clear();
+  FConnection.Headers.Clear();
 end;
 
 constructor THTTPTransport.Create();