summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authormarcus <marcus@3ad0048d-3df7-0310-abae-a5850022a9f2>2016-05-29 15:46:12 +0000
committermarcus <marcus@3ad0048d-3df7-0310-abae-a5850022a9f2>2016-05-29 15:46:12 +0000
commit32fde0e64727cc24417487bd3a6d81ac2e3c0d68 (patch)
tree8aae2d7761317a0b364a7983eebc325ec99fa9c1
parent09853cb0a94e6587677f8f8bd5bea4c43abfb30c (diff)
downloadfpc-32fde0e64727cc24417487bd3a6d81ac2e3c0d68.tar.gz
Removed debug output from GetServerURL()
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@33846 3ad0048d-3df7-0310-abae-a5850022a9f2
-rw-r--r--packages/fcl-web/src/base/fphttpclient.pp1
1 files changed, 0 insertions, 1 deletions
diff --git a/packages/fcl-web/src/base/fphttpclient.pp b/packages/fcl-web/src/base/fphttpclient.pp
index bafff68501..ec0e1da073 100644
--- a/packages/fcl-web/src/base/fphttpclient.pp
+++ b/packages/fcl-web/src/base/fphttpclient.pp
@@ -513,7 +513,6 @@ begin
Result:=':'+IntToStr(URI.Port)+Result;
Result:=URI.Protocol+'://'+URI.Host+Result;
end;
- Writeln('Doing URL : ',Result);
end;
function TFPCustomHTTPClient.GetSocketHandler(const UseSSL: Boolean): TSocketHandler;