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

2002-01-12 14:20 UTC+0300 Alexander Kresin <alex@belacy.belgorod.su>

Browse Source
This commit is contained in:
Alexander S.Kresin
2002-01-12 11:17:51 +00:00
parent 0ce01f5a88
commit fd3be2c345
2 changed files with 6 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -7,6 +7,11 @@
For example:
2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
* source/rtl/filehb.c
! OS/2 IBM C++ fix.
2002-01-14 15:05 UTC-0500 Paul Tucker <ptucker@sympatico.ca>
* source\common\hbffind.c
* Added missed Attribute check (thanks Victor)
2002-01-14 14:30 UTC-0500 Paul Tucker <ptucker@sympatico.ca>

2
harbour/source/rdd/dbfntx/dbfntx1.c
View File

@@ -290,7 +290,7 @@ static int hb_ntxTagFindCurrentKey( LPPAGEINFO pPage, LONG lBlock, LPKEYINFO pKe
pPage->TagParent->CurKeyInfo->Xtra = pKey->Xtra;
pPage->TagParent->CurKeyInfo->Tag = pPage->Page;
}
if( p->Tag && ( k < 0 || ( (ULONG)p->Xtra != pPage->TagParent->Owner->Owner->ulRecNo ) ) )
if( p->Tag && ( k < 0 || lSeek || ( (ULONG)p->Xtra != pPage->TagParent->Owner->Owner->ulRecNo ) ) )
{
LONG blockPrev, blockNext;
SHORT keyPrev, keyNext;