diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index c2f8ba92ac..c9b0cc91d5 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,9 +8,9 @@
    2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
 */
 
-2002-10-22 09:00 UTC-0500 Paul Tucker <ptucker@sympatico.ca>
-  * makefile.vc
-    + source/debug/dbghelp.prg
+2002-10-22 12:00 UTC-0500 Paul Tucker <ptucker@sympatico.ca>
+  * source/rdd/dbcmd.c
+    ! Fix a problem with Select() that I introduced.
 
 2002-10-21 05:11 UTC+0100 Antonio Linares <alinares@fivetech.com>
   * source/rtl/achoice.prg
diff --git a/harbour/source/rdd/dbcmd.c b/harbour/source/rdd/dbcmd.c
index 08f3ace54d..f06cf57082 100644
--- a/harbour/source/rdd/dbcmd.c
+++ b/harbour/source/rdd/dbcmd.c
@@ -2859,7 +2859,7 @@ HB_FUNC( RLOCK )
 
 HB_FUNC( SELECT )
 {
-   int nRet = 0;
+   int nRet = s_uiCurrArea;
 
    if( ISCHAR(1) )
    {
@@ -2871,7 +2871,7 @@ HB_FUNC( SELECT )
       else if( ulLen > 0 )
          nRet = hb_rddSelect( szAlias );
       else
-         nRet = s_uiCurrArea;
+         nRet = 0;
    }
 
    hb_retni( nRet );