diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index eb07d1357d..63e3cc225e 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,7 @@
+2001-11-16 21:31 GMT-3 Horacio Roldan <harbour_ar@yahoo.com.ar>
+   * source/rdd/dbfcdx/dbfcdx1.c
+     ! fixed bug opening empty files with set delete on
+
 2001-11-16 17:35 GMT+1 Antonio Linares <alinares@fivetech.com>
    * source/vm/hvm.c
      + Added new function __VMVARSLEN() --> nStatics
diff --git a/harbour/source/rdd/dbfcdx/dbfcdx1.c b/harbour/source/rdd/dbfcdx/dbfcdx1.c
index b32e1a77a2..9789fc25c6 100644
--- a/harbour/source/rdd/dbfcdx/dbfcdx1.c
+++ b/harbour/source/rdd/dbfcdx/dbfcdx1.c
@@ -4539,10 +4539,10 @@ ERRCODE hb_cdxGoTo( CDXAREAP pArea, ULONG ulRecNo )
 
    if( SUPER_GOTO( ( AREAP ) pArea, ulRecNo ) == FAILURE )
       return FAILURE;
-
+   /*
    if ( pArea->fEof )
       return FAILURE;
-
+   */
    pTag = hb_cdxGetActiveTag( pArea->lpIndexes );
    if ( ! pTag )
       return SUCCESS;