From f1eaecc649a269c0f784300660a20a1542f6e364 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Micha=C3=ABl=20Van=20Canneyt?= <michael@freepascal.org>
Date: Tue, 26 Dec 2023 17:42:13 +0100
Subject: [PATCH] * Removed debug writeln

---
 components/fpcunit/testinsight/testinsightclient.pas | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/components/fpcunit/testinsight/testinsightclient.pas b/components/fpcunit/testinsight/testinsightclient.pas
index 2616eec836..53b2937846 100644
--- a/components/fpcunit/testinsight/testinsightclient.pas
+++ b/components/fpcunit/testinsight/testinsightclient.pas
@@ -83,8 +83,8 @@ begin
   Body:=Nil;
   Res:=TStringStream.Create('');
   try
-    Writeln('Sending content to; ',ConcatURL(aURL),':');
-    Writeln(aContent);
+    // Writeln('Sending content to; ',ConcatURL(aURL),':');
+    // Writeln(aContent);
     if aContent<>'' then
       Body:=TStringStream.Create(aContent);
     FHTTP.RequestBody:=Body;
@@ -111,10 +111,10 @@ begin
   Res:=TStringStream.Create('');
   try
     try
-      Writeln('Get URL ',ConcatURL(aURL),':');
+      // Writeln('Get URL ',ConcatURL(aURL),':');
       FHTTP.Get(ConcatURL(aURL),Res);
       Result:=Res.DataString;
-      Writeln(Result);
+      // Writeln(Result);
       SetError(Nil);
     except
       on E : Exception do