From a808f949abcc2dad4e111707006d5a8ffeaf44e7 Mon Sep 17 00:00:00 2001
From: Andreas Schneider <aksdb@gmx.de>
Date: Thu, 17 Sep 2015 16:24:10 +0200
Subject: [PATCH] * Fixed header replacement when using fcl-web

---
 restemplate.lpr | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/restemplate.lpr b/restemplate.lpr
index 57d7a92..b00445d 100644
--- a/restemplate.lpr
+++ b/restemplate.lpr
@@ -70,9 +70,10 @@ var
 begin
   parser.Content := AHeader;
   parser.Replace;
+  AHeader := parser.Content;
 
   {$ifdef use_synapse}
-  http.Headers.Add(parser.Content);
+  http.Headers.Add(AHeader);
   {$endif}
 
   {$ifdef use_fclweb}