From 093d867706850cc999a2884c4ed40aa4810daf4d Mon Sep 17 00:00:00 2001
From: Luis Krause <kaddath@gmail.com>
Date: Fri, 12 Dec 2003 19:51:04 +0000
Subject: [PATCH] 2003-12-12 11:45 UTC-0800 Luis Krause Mantilla

---
 harbour/ChangeLog          | 5 +++++
 harbour/source/rdd/dbcmd.c | 3 +--
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 67ae48fe69..3cb3c89a6a 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,11 @@
    2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
 */
 
+2003-12-12 11:45 UTC-0800 Luis Krause Mantilla <lkrausem /*at*/ shaw /*dot*/ ca>
+  * source/rdd/dbcmd.c
+    ! Fixed dbSelectArea() bug reported by Giovi Verrua
+      Thanks to Ryszard for the heads-up
+
 2003-12-10 18:20 UTC-0500 David G. Holm <dholm@jsd-llc.com>
 
   * utils/hbver/hbverfix.c
diff --git a/harbour/source/rdd/dbcmd.c b/harbour/source/rdd/dbcmd.c
index dcf729b347..bf99ff19ef 100644
--- a/harbour/source/rdd/dbcmd.c
+++ b/harbour/source/rdd/dbcmd.c
@@ -1821,9 +1821,8 @@ HB_FUNC( DBSELECTAREA )
 
                if( uiAction == E_RETRY )
                {
-                  if( ( uiNewArea = hb_rddSelect( szAlias ) ) == 0 )
+                  if( ( uiNewArea = hb_rddSelect( szAlias ) ) != 0 )
                   {
-                     uiNewArea = hb_rddSelect( szAlias );
                      uiAction = E_DEFAULT;
                   }
                }