From 522f5c7dafafbd4b4f2b7f0f65c3a387f152b370 Mon Sep 17 00:00:00 2001 From: Viktor Szakats Date: Sun, 18 May 2008 07:22:10 +0000 Subject: [PATCH] 2008-05-18 09:22 UTC+0100 Viktor Szakats (harbour.01 syenar hu) * contrib/rddads/adsfunc.c + QUESTION added. * Formatting. --- harbour/ChangeLog | 5 +++++ harbour/contrib/rddads/adsfunc.c | 6 +++++- 2 files changed, 10 insertions(+), 1 deletion(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 83f18e022d..29b0d9bb20 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,6 +8,11 @@ 2008-12-31 13:59 UTC+0100 Foo Bar */ +2008-05-18 09:22 UTC+0100 Viktor Szakats (harbour.01 syenar hu) + * contrib/rddads/adsfunc.c + + QUESTION added. + * Formatting. + 2008-05-18 09:21 UTC+0100 Viktor Szakats (harbour.01 syenar hu) * contrib/hbhpdf/harupdf.c ! Fixed all MSVC warnings. Now builds cleanly. diff --git a/harbour/contrib/rddads/adsfunc.c b/harbour/contrib/rddads/adsfunc.c index 626292e8ba..76072430ab 100644 --- a/harbour/contrib/rddads/adsfunc.c +++ b/harbour/contrib/rddads/adsfunc.c @@ -1402,6 +1402,7 @@ HB_FUNC( ADSCREATESQLSTATEMENT ) } else { + /* QUESTION: Is this right? [vszakats] */ hb_rddReleaseCurrentArea(); } } @@ -2231,7 +2232,10 @@ HB_FUNC( ADSDDSETDATABASEPROPERTY ) case ADS_DD_ADMIN_PASSWORD: case ADS_DD_ENCRYPT_TABLE_PASSWORD: { - ulRetVal = AdsDDSetDatabaseProperty( hConnect, ulProperty, HB_IS_STRING( pParam ) ? hb_itemGetCPtr( pParam ) : NULL, ( UNSIGNED16 ) hb_itemGetCLen( pParam ) + 1 ); + ulRetVal = AdsDDSetDatabaseProperty( hConnect, + ulProperty, + HB_IS_STRING( pParam ) ? hb_itemGetCPtr( pParam ) : NULL, + ( UNSIGNED16 ) hb_itemGetCLen( pParam ) + 1 ); break; } /* String properties (NULL not accepted) */