[Instantobjects-cvscommit] Demos/PrimerCross/Model Model.pas,1.2,1.3

[Nando D. <na...@us...>]

Update of /cvsroot/instantobjects/Demos/PrimerCross/Model
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29863/PrimerCross/Model

Modified Files:
	Model.pas 
Log Message:
fixed incorrect spacing of the IOMETADATA keyword

Index: Model.pas
===================================================================
RCS file: /cvsroot/instantobjects/Demos/PrimerCross/Model/Model.pas,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** Model.pas	18 Feb 2005 11:04:08 -0000	1.2
--- Model.pas	1 Mar 2005 05:37:30 -0000	1.3
***************
*** 23,27 ****
  
    TAddress = class(TInstantObject)
!   { IOMETADATA City: String(30) index;
      Country: Reference(TCountry);
      State: String(4);
--- 23,27 ----
  
    TAddress = class(TInstantObject)
!   {IOMETADATA City: String(30) index;
      Country: Reference(TCountry);
      State: String(4);
***************
*** 53,57 ****
  
    TCountry = class(TInstantObject)
!   { IOMETADATA stored;
      Name: String(30); }
      _Name: TInstantString;
--- 53,57 ----
  
    TCountry = class(TInstantObject)
!   {IOMETADATA stored;
      Name: String(30); }
      _Name: TInstantString;
***************
*** 68,72 ****
  
    TPhone = class(TInstantObject)
!   { IOMETADATA Name: String(20);
      Number: String(20) mask '(000) 000-0000;0;_'; }
      _Name: TInstantString;
--- 68,72 ----
  
    TPhone = class(TInstantObject)
!   {IOMETADATA Name: String(20);
      Number: String(20) mask '(000) 000-0000;0;_'; }
      _Name: TInstantString;
***************
*** 83,87 ****
  
    TEmail = class(TInstantObject)
!   { IOMETADATA Address: String(100); }
      _Address: TInstantString;
    private
--- 83,87 ----
  
    TEmail = class(TInstantObject)
!   {IOMETADATA Address: String(100); }
      _Address: TInstantString;
    private
***************
*** 93,97 ****
  
    TCategory = class(TInstantObject)
!   { IOMETADATA stored;
      Name: String(30); }
      _Name: TInstantString;
--- 93,97 ----
  
    TCategory = class(TInstantObject)
!   {IOMETADATA stored;
      Name: String(30); }
      _Name: TInstantString;
***************
*** 106,110 ****
  
    TContact = class(TInstantObject)
!   { IOMETADATA stored;
      Address: Part(TAddress);
      Category: Reference(TCategory);
--- 106,110 ----
  
    TContact = class(TInstantObject)
!   {IOMETADATA stored;
      Address: Part(TAddress);
      Category: Reference(TCategory);
***************
*** 209,213 ****
  
    TCompany = class(TContact)
!   { IOMETADATA stored;
      Employees: References(TPerson); }
      _Employees: TInstantReferences;
--- 209,213 ----
  
    TCompany = class(TContact)
!   {IOMETADATA stored;
      Employees: References(TPerson); }
      _Employees: TInstantReferences;