From 6b6e7758df35bf75fb05550af7d8d81bf014d17a Mon Sep 17 00:00:00 2001 From: "Alexander S.Kresin" Date: Thu, 14 Mar 2002 10:56:28 +0000 Subject: [PATCH] 2002-03-14 14:00 UTC+0300 Alexander Kresin --- harbour/ChangeLog | 4 ++++ harbour/source/rdd/dbfntx/dbfntx1.c | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index aee7a59bd8..f7c9ead33e 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -7,6 +7,10 @@ For example: 2002-12-01 23:12 UTC+0100 Foo Bar */ + * source/rdd/dbfcdx/dbfcdx1.c + + added compatibility with Clipper 5.3 (FlexFile) memo headers + bug reported by Walter Negro. + 2002-03-16 19:31 UTC-0300 Horacio Roldan * source/rdd/dbfcdx/dbfcdx1.c ! fixed bug with keys updating diff --git a/harbour/source/rdd/dbfntx/dbfntx1.c b/harbour/source/rdd/dbfntx/dbfntx1.c index 7f27ebd762..f9679fbfc7 100644 --- a/harbour/source/rdd/dbfntx/dbfntx1.c +++ b/harbour/source/rdd/dbfntx/dbfntx1.c @@ -308,7 +308,7 @@ static int hb_ntxTagFindCurrentKey( LPPAGEINFO pPage, LONG lBlock, LPKEYINFO pKe if( ( k == 0 && !lSeek && (ULONG)p->Xtra != pPage->TagParent->Owner->Owner->ulRecNo ) || ( lSeek && ntxIsRecBad( pPage->TagParent->Owner->Owner, p->Xtra ) ) ) k = 1; - if( k <= 0 ) + if( k <= 0 && pPage->CurKey < pPage->uiKeys ) { pKey->Xtra = p->Xtra; pPage->TagParent->CurKeyInfo->Xtra = pKey->Xtra;