From 749a3d7128bd9240eb2a67eccf1fa9223c2593ae Mon Sep 17 00:00:00 2001
From: Vladimir Krapotkin <vkrapotkin@yandex.ru>
Date: Thu, 9 Aug 2018 22:27:58 +0500
Subject: [PATCH] Issue #128

---
 XSuperObject.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/XSuperObject.pas b/XSuperObject.pas
index ba27614..1018eec 100644
--- a/XSuperObject.pas
+++ b/XSuperObject.pas
@@ -1551,7 +1551,7 @@ procedure TSuperArray.SaveTo(Stream: TStream; const Ident, UniversalTime: Boolea
 begin
   S := TStringStream.Create( AsJSON(Ident, UniversalTime) );
   try
-     S.SaveToStream(S);
+     S.SaveToStream(Stream);
   finally
      S.Free;
   end;