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

2009-12-17 22:59 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)

Browse Source 
* contrib/hbwin/mapi.c
    ! Fixed typo causing GPF when using 'long' calling form.
    ! Fixed not counting recipients when using 'simple' calling form.
    ; Toninho, could you pls retest?
This commit is contained in:
Viktor Szakats
2009-12-17 21:59:47 +00:00
parent c4ea4ea436
commit caf44bd828
2 changed files with 9 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
harbour/ChangeLog
View File

@@ -17,6 +17,12 @@
past entries belonging to author(s): Viktor Szakats.
*/
2009-12-17 22:59 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
* contrib/hbwin/mapi.c
! Fixed typo causing GPF when using 'long' calling form.
! Fixed not counting recipients when using 'simple' calling form.
; Toninho, could you pls retest?
2009-12-17 22:21 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
* contrib/hbqt/hbqt_misc.prg
* contrib/hbide/hbide.prg

4
harbour/contrib/hbwin/mapi.c
View File

@@ -165,7 +165,7 @@ HB_FUNC( WIN_MAPISENDMAIL )
else
continue;
if( hb_arrayLen( pItem ) >= 3 && HB_IS_NUMERIC( hb_arrayGetPtr( pItem, 3 ) ) )
if( hb_arrayLen( pItem ) >= 3 && HB_IS_NUMERIC( hb_arrayGetItemPtr( pItem, 3 ) ) )
note.lpRecips[ note.nRecipCount ].ulRecipClass = ( ULONG ) hb_arrayGetNL( pItem, 3 );
else
note.lpRecips[ note.nRecipCount ].ulRecipClass = MAPI_TO;
@@ -176,6 +176,8 @@ HB_FUNC( WIN_MAPISENDMAIL )
{
note.lpRecips[ note.nRecipCount ].lpszName = ( LPSTR ) HB_ITEMGETSTR( pItem, &hString[ iString++ ], NULL );
note.lpRecips[ note.nRecipCount ].ulRecipClass = MAPI_TO;
++note.nRecipCount;
}
}