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

2000-10-10 16:12 GMT+3 Alexander Kresin <alex@belacy.belgorod.su>

Browse Source
This commit is contained in:
Alexander S.Kresin
2000-10-10 12:13:50 +00:00
parent 0aab1805cb
commit a4eb34d33a
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

@@ -1,3 +1,7 @@
2000-10-10 16:12 GMT+3 Alexander Kresin <alex@belacy.belgorod.su>
*contrib/rdd_ads/ads1.c
* fixed bug with creating compound indexes, reported by Antonio Linares
2000-10-10 14:50 GMT+3 Alexander Kresin <alex@belacy.belgorod.su>
* source/rdd/workarea.c
* fixed bug, related to fields handling

5
harbour/contrib/rdd_ads/ads1.c
View File

@@ -1283,10 +1283,7 @@ static ERRCODE adsOrderCreate( ADSAREAP pArea, LPDBORDERCREATEINFO pOrderInfo )
ulOptions = ADS_COMPOUND;
else
{
int slen = strlen( pArea->szDataFileName );
char * ptr = pArea->szDataFileName + slen - 4;
if( strcmpNoCase( ( char * ) pOrderInfo->abBagName, ( char * ) pArea->szDataFileName,
( slen >= 4 && strcmpNoCase( ".dbf", ptr, 0 ) ) ? slen-4:0 ) )
if( pOrderInfo->atomBagName && *(pOrderInfo->atomBagName) != '\0' )
ulOptions = ADS_COMPOUND;
}