From db3441c4c543481f3fbdd3467857cd164804ae75 Mon Sep 17 00:00:00 2001
From: Davi de Souza <84209085+davisouzatb@users.noreply.github.com>
Date: Tue, 4 Jun 2024 11:44:04 -0300
Subject: [PATCH] =?UTF-8?q?fix()=20problema=20com=20caracter=20especial=20?=
 =?UTF-8?q?usando=20toString=20n=C3=A3o=20estava=20tratando=20retorno=20in?=
 =?UTF-8?q?validando=20json=20em=20alguns=20casos.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

funcionava antes deste commit https://github.com/HashLoad/jhonson/commit/80fb6d0334298af8245ebdcc3b5ed16dd361adb7
---
 src/Horse.Jhonson.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Horse.Jhonson.pas b/src/Horse.Jhonson.pas
index 6b4d889..6c6a57d 100644
--- a/src/Horse.Jhonson.pas
+++ b/src/Horse.Jhonson.pas
@@ -65,7 +65,7 @@ procedure Middleware(Req: THorseRequest; Res: THorseResponse; Next: {$IF DEFINED
       {$IF DEFINED(FPC)}
       Res.RawWebResponse.ContentStream := TStringStream.Create(TJsonData(Res.Content).AsJSON);
       {$ELSE}
-      Res.RawWebResponse.Content := TJSONValue(Res.Content).ToString;
+      Res.RawWebResponse.Content := TJSONValue(Res.Content).ToJSON;
       {$ENDIF}
       Res.RawWebResponse.ContentType := 'application/json; charset=' + Charset;
     end;