From 71d16687eb41d54029b52bfd843c93c707a363f3 Mon Sep 17 00:00:00 2001 From: Viktor Szakats Date: Sat, 29 Sep 2007 10:01:33 +0000 Subject: [PATCH] 2007-09-29 11:50 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) * source/rdd/dbfntx/dbfntx1.c * source/rdd/dbfcdx/dbfcdx1.c * source/rdd/dbf1.c + Added support for _SET_DEFEXTENSIONS to RDD. (Przemek pls review it. I cannot send you direct mail, because it bounces) --- harbour/ChangeLog | 6 ++++++ harbour/source/rdd/dbf1.c | 4 ++-- harbour/source/rdd/dbfcdx/dbfcdx1.c | 2 +- harbour/source/rdd/dbfntx/dbfntx1.c | 2 +- 4 files changed, 10 insertions(+), 4 deletions(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 343693b3ef..cce8f211ce 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,6 +8,12 @@ 2002-12-01 13:30 UTC+0100 Foo Bar */ +2007-09-29 11:50 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) + * source/rdd/dbfntx/dbfntx1.c + * source/rdd/dbfcdx/dbfcdx1.c + * source/rdd/dbf1.c + + Added support for _SET_DEFEXTENSIONS to RDD. + 2007-09-28 23:57 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/source/rdd/dbf1.c ! fixed typo in hb_dbfGetRowVer() reported by Mindaugas, many diff --git a/harbour/source/rdd/dbf1.c b/harbour/source/rdd/dbf1.c index 03a621ec87..75f5849279 100644 --- a/harbour/source/rdd/dbf1.c +++ b/harbour/source/rdd/dbf1.c @@ -5147,7 +5147,7 @@ static ERRCODE hb_dbfDrop( LPRDDNODE pRDD, PHB_ITEM pItemTable, PHB_ITEM pItemIn pFileName = hb_fsFNameSplit( szFile ); - if( !pFileName->szExtension ) + if( hb_set.HB_SET_DEFEXTENSIONS && !pFileName->szExtension ) { /* Add default extension if missing */ pFileExt = hb_itemPutC( NULL, "" ); @@ -5228,7 +5228,7 @@ static ERRCODE hb_dbfExists( LPRDDNODE pRDD, PHB_ITEM pItemTable, PHB_ITEM pItem pFileName = hb_fsFNameSplit( szFile ); - if( !pFileName->szExtension ) + if( hb_set.HB_SET_DEFEXTENSIONS && !pFileName->szExtension ) { pFileExt = hb_itemPutC( NULL, "" ); if( SELF_RDDINFO( pRDD, fTable ? RDDI_TABLEEXT : RDDI_ORDBAGEXT, 0, pFileExt ) == SUCCESS ) diff --git a/harbour/source/rdd/dbfcdx/dbfcdx1.c b/harbour/source/rdd/dbfcdx/dbfcdx1.c index f29868dc6f..c6ba06f4fc 100644 --- a/harbour/source/rdd/dbfcdx/dbfcdx1.c +++ b/harbour/source/rdd/dbfcdx/dbfcdx1.c @@ -4867,7 +4867,7 @@ static void hb_cdxCreateFName( CDXAREAP pArea, char * szBagName, BOOL * fProd, szBaseName[ 0 ] = '\0'; } - if( !pFileName->szExtension || !fName ) + if( ( hb_set.HB_SET_DEFEXTENSIONS && !pFileName->szExtension ) || !fName ) { DBORDERINFO pExtInfo; memset( &pExtInfo, 0, sizeof( pExtInfo ) ); diff --git a/harbour/source/rdd/dbfntx/dbfntx1.c b/harbour/source/rdd/dbfntx/dbfntx1.c index 63a8f5c596..2c0e6c78a0 100644 --- a/harbour/source/rdd/dbfntx/dbfntx1.c +++ b/harbour/source/rdd/dbfntx/dbfntx1.c @@ -3489,7 +3489,7 @@ static void hb_ntxCreateFName( NTXAREAP pArea, char * szBagName, BOOL * fProd, szTagName[ 0 ] = '\0'; } - if( !pFileName->szExtension || !fName ) + if( ( hb_set.HB_SET_DEFEXTENSIONS && !pFileName->szExtension ) || !fName ) { DBORDERINFO pExtInfo; memset( &pExtInfo, 0, sizeof( pExtInfo ) );