diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 3306d9594a..fa97e9430e 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -7,6 +7,11 @@
    For example:
    2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
 */
+  * contrib/rdd_ads/ads1.c
+    ! fixed a bug in adsSeek() for date indexes, changes was posted
+      by Carlos Mora.
+
+2002-05-14 16:22 UTC-0400 David G. Holm <dholm@jsd-llc.com>
   * source/rdd/dbfntx/dbfntx1.c
     ! Changed usage of stricmp to hb_stricmp, because stricmp is not an
       ANSI standard function.
diff --git a/harbour/source/rdd/dbfntx/dbfntx1.c b/harbour/source/rdd/dbfntx/dbfntx1.c
index 0990c9e43e..94f67b27ba 100644
--- a/harbour/source/rdd/dbfntx/dbfntx1.c
+++ b/harbour/source/rdd/dbfntx/dbfntx1.c
@@ -2826,7 +2826,7 @@ static LPTAGINFO ntxFindIndex( NTXAREAP pArea , PHB_ITEM lpOrder )
    {
       do
       {
-         if( !stricmp( current->TagName , hb_itemGetCPtr( lpOrder ) ) )
+         if( !hb_stricmp( current->TagName , hb_itemGetCPtr( lpOrder ) ) )
             return current;
          current = current->pNext;
       } while( current );