fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2009-05-28 09:43 UTC+0200 Viktor Szakats (harbour.01 syenar hu)

Browse Source 
* contrib/gtwvg/wvgsink.c
    ! Minor fix to returning HRESULT.
This commit is contained in:
Viktor Szakats
2009-05-28 07:44:07 +00:00
parent 801b358f32
commit 98158b8a08
2 changed files with 5 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -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.

5
harbour/contrib/gtwvg/wvgsink.c
View File

@@ -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 );
}
/*----------------------------------------------------------------------*/