From caf44bd8287f629bd37fa43875ad597134dd4dec Mon Sep 17 00:00:00 2001 From: Viktor Szakats Date: Thu, 17 Dec 2009 21:59:47 +0000 Subject: [PATCH] 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? --- harbour/ChangeLog | 6 ++++++ harbour/contrib/hbwin/mapi.c | 4 +++- 2 files changed, 9 insertions(+), 1 deletion(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 8c75708ca5..ef6ace7ae2 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -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 diff --git a/harbour/contrib/hbwin/mapi.c b/harbour/contrib/hbwin/mapi.c index 038a2d1325..a2d451a6ef 100644 --- a/harbour/contrib/hbwin/mapi.c +++ b/harbour/contrib/hbwin/mapi.c @@ -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; } }