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

[<jcm...@us...>]

Revision: 672
Author:   jcmoraisjr
Date:     2006-05-02 12:09:06 -0700 (Tue, 02 May 2006)
ViewCVS:  http://svn.sourceforge.net/instantobjects?rev=672&view=rev

Log Message:
-----------
Changed the visibility of the TInstantReferences.ObjectReferenceList
property (private -> protected)

Modified Paths:
--------------
    trunk/Source/Core/InstantPersistence.pas
Modified: trunk/Source/Core/InstantPersistence.pas
===================================================================
--- trunk/Source/Core/InstantPersistence.pas	2006-05-01 21:24:47 UTC (rev 671)
+++ trunk/Source/Core/InstantPersistence.pas	2006-05-02 19:09:06 UTC (rev 672)
@@ -1100,8 +1100,6 @@
     FConnector: TInstantConnector;
     FObjectReferenceList: TInstantObjectReferenceList;
     function GetObjectReferenceList: TInstantObjectReferenceList;
-    property ObjectReferenceList: TInstantObjectReferenceList read
-        GetObjectReferenceList;
     function GetRefItems(Index: Integer): TInstantObjectReference;
   protected
     class function AttributeType: TInstantAttributeType; override;
@@ -1123,6 +1121,8 @@
     procedure SetAllowOwned(Value: Boolean); virtual;
     procedure ValidateObject(AObject: TInstantObject); override;
     procedure WriteObject(Writer: TInstantWriter); override;
+    property ObjectReferenceList: TInstantObjectReferenceList read
+        GetObjectReferenceList;
   public
     destructor Destroy; override;
     procedure Assign(Source: TPersistent); override;