TPersistent renamed as HBPersistent

This commit is contained in:
Antonio Linares
2001-09-05 10:11:23 +00:00
parent b2cd85ad39
commit 0683d00cd1

View File

@@ -4,7 +4,7 @@
/*
* Harbour Project source code:
* Class TPersistent
* Class HBPersistent
*
* Copyright 2001 Antonio Linares <alinares@fivetech.com>
* www - http://www.harbour-project.org
@@ -53,7 +53,7 @@
#include "hbclass.ch"
#include "common.ch"
CLASS TPersistent
CLASS HBPersistent
METHOD SaveToText( cObjectName )
@@ -61,7 +61,7 @@ CLASS TPersistent
ENDCLASS
METHOD SaveToText( cObjectName ) CLASS TPersistent
METHOD SaveToText( cObjectName ) CLASS HBPersistent
local oNew := &( ::ClassName() + "()" ):New()
local aProperties, n, uValue, cObject, cType