diff --git a/harbour/ChangeLog b/harbour/ChangeLog index b956a04743..1ae3e759ea 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -17,6 +17,10 @@ past entries belonging to these authors: Viktor Szakats. */ +2009-05-28 09:43 UTC+0200 Viktor Szakats (harbour.01 syenar hu) + * contrib/gtwvg/wvgsink.c + ! Minor fix to returning HRESULT. + 2009-05-28 00:19 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com) * contrib/gtwvg/wvgwin.c ! Small fix to previous commit. diff --git a/harbour/contrib/gtwvg/wvgsink.c b/harbour/contrib/gtwvg/wvgsink.c index 70f422dcbe..a52051b78f 100644 --- a/harbour/contrib/gtwvg/wvgsink.c +++ b/harbour/contrib/gtwvg/wvgsink.c @@ -176,9 +176,7 @@ static void hb_itemPushList( ULONG ulRefMask, ULONG ulPCount, PHB_ITEM** pItems hb_vmPush( &itmRef ); } else - { hb_vmPush( ( *pItems )[ ulParam ] ); - } } } } @@ -653,8 +651,7 @@ HB_FUNC( WVG_AXDOVERB ) /* ( hWndAx, iVerb ) --> hResult */ hb_oleSetError( lOleError ); - hb_retni( ( int ) lOleError ); + hb_retnl( lOleError ); } /*----------------------------------------------------------------------*/ -