From 6836b6dde75bdb67c3480b8f65791d71e074a62a Mon Sep 17 00:00:00 2001 From: Pritpal Bedi Date: Wed, 26 Jan 2011 07:18:19 +0000 Subject: [PATCH] 2011-01-25 23:15 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com) * contrib/hbxbp/xbpmenubar.prg ! Fixed: a stupid untested typo. --- harbour/ChangeLog | 4 ++++ harbour/contrib/hbxbp/xbpmenubar.prg | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index a902e69d1e..f9e5ae5257 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,10 @@ The license applies to all entries newer than 2009-04-28. */ +2011-01-25 23:15 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com) + * contrib/hbxbp/xbpmenubar.prg + ! Fixed: a stupid untested typo. + 2011-01-26 02:10 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) * contrib/hbnetio/utils/netiosrv/netiosrv.prg * contrib/hbnetio/utils/netiosrv/netiocmd.prg diff --git a/harbour/contrib/hbxbp/xbpmenubar.prg b/harbour/contrib/hbxbp/xbpmenubar.prg index 5a758d56bf..c9b20147f3 100644 --- a/harbour/contrib/hbxbp/xbpmenubar.prg +++ b/harbour/contrib/hbxbp/xbpmenubar.prg @@ -700,7 +700,7 @@ METHOD xbpMenu:create( oParent, aPresParams, lVisible ) ::oWidget := QMenu() - IF hb_isObject( oParent ) + IF hb_isObject( ::oParent ) ::oParent:oWidget:addMenu( ::oWidget ) ::oParent:addChild( self ) ENDIF