From c8fd2ef82b2673a51d699a2982ffd7276aee0159 Mon Sep 17 00:00:00 2001
From: "Alexander S.Kresin" <alex@belacy.belgorod.su>
Date: Sat, 23 Feb 2002 12:46:55 +0000
Subject: [PATCH] 2002-02-23 15:48 UTC+0300 Alexander Kresin
 <alex@belacy.belgorod.su>

---
 harbour/ChangeLog                   | 4 ++++
 harbour/source/rdd/dbfntx/dbfntx1.c | 5 +++++
 2 files changed, 9 insertions(+)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index c0305f5273..6d132e127c 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -7,6 +7,10 @@
    For example:
    2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
 */
+      so be sure to rebuild the compiler before testing.
+
+2002-02-26 15:40 UTC+0300 Alexander Kresin <alex@belacy.belgorod.su>
+  * source/pp/ppcore.c
     * bug fixed, reported by Lorenzo Fiorini
 
 2002-02-26 11:53 UTC+0300 Alexander Kresin <alex@belacy.belgorod.su>
diff --git a/harbour/source/rdd/dbfntx/dbfntx1.c b/harbour/source/rdd/dbfntx/dbfntx1.c
index 21444f0439..1c6cd96b53 100644
--- a/harbour/source/rdd/dbfntx/dbfntx1.c
+++ b/harbour/source/rdd/dbfntx/dbfntx1.c
@@ -1420,6 +1420,11 @@ static BOOL hb_ntxSortKeyAdd( LPTAGINFO pTag, LPNTXSORTINFO pSortInfo, char* szk
          result = ( result > 0 )? -1:1;
       if( result < 0 )
          pKeyNew->pNext = pKeyTmp;
+      else if( !result && pTag->UniqueKey )
+      {
+         pSortInfo->ulKeyCount --;
+         ( pSortInfo->nItems ) --;
+      }
       else
       {
          pKeyTmp->pNext = pKeyNew;