[Instantobjects-cvscommit] SF.net SVN: instantobjects:[979] trunk/Source/Core/InstantPersistence.pas

[<car...@us...>]

Revision: 979
          http://sourceforge.net/p/instantobjects/code/979
Author:   carlobar
Date:     2017-04-04 14:00:04 +0000 (Tue, 04 Apr 2017)
Log Message:
-----------
Fixed xml encoding for object's Id into containers.

Modified Paths:
--------------
    trunk/Source/Core/InstantPersistence.pas

Modified: trunk/Source/Core/InstantPersistence.pas
===================================================================
--- trunk/Source/Core/InstantPersistence.pas	2017-03-16 08:57:46 UTC (rev 978)
+++ trunk/Source/Core/InstantPersistence.pas	2017-04-04 14:00:04 UTC (rev 979)
@@ -5489,7 +5489,7 @@
       begin
         InstantXMLProducer.WriteStartTag(
                 ObjectReferenceList.RefItems[I].ObjectClassName);
-        InstantXMLProducer.WriteData(ObjectReferenceList.RefItems[I].ObjectId);
+        InstantXMLProducer.WriteEscapedData(ObjectReferenceList.RefItems[I].ObjectId);
         InstantXMLProducer.WriteEndTag;
       end;
       InstantXMLProducer.WriteEndTag;