From 05d966aa493459975d736a7ae751dd38489e167e Mon Sep 17 00:00:00 2001
From: Antonio Linares <alinares@fivetechsoft.com>
Date: Wed, 5 Sep 2001 10:24:24 +0000
Subject: [PATCH] TPersistent changed into HBPersistent

---
 harbour/contrib/hgf/win32/tform.prg | 2 --
 harbour/contrib/hgf/win32/tmenu.prg | 2 --
 2 files changed, 4 deletions(-)

diff --git a/harbour/contrib/hgf/win32/tform.prg b/harbour/contrib/hgf/win32/tform.prg
index 446d248088..07feb875a5 100644
--- a/harbour/contrib/hgf/win32/tform.prg
+++ b/harbour/contrib/hgf/win32/tform.prg
@@ -104,8 +104,6 @@ METHOD New() CLASS TForm
 
    DEFAULT ::lRegistered TO .f.
 
-   Super:New()
-
    if ! ::lRegistered
       WinRegisterClass( "HB_TFORM" )
       ::lRegistered = .t.
diff --git a/harbour/contrib/hgf/win32/tmenu.prg b/harbour/contrib/hgf/win32/tmenu.prg
index 13b5f16f6e..0e7d6d8657 100644
--- a/harbour/contrib/hgf/win32/tmenu.prg
+++ b/harbour/contrib/hgf/win32/tmenu.prg
@@ -66,8 +66,6 @@ ENDCLASS
 
 METHOD New( oForm ) CLASS TMenu
 
-   Super:New()
-
    ::Items   = {}
 
    if oForm != nil