diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 9680be962e..ee1b107f2e 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,11 @@
    2002-12-01 13:30 UTC+0100 Foo Bar <foo.bar@foobar.org>
 */
 
+2007-05-04 11:06 UTC+0100 Miguel Angel Marchuet (miguelangel/at/marchuet.net)
+  * source/rdd/wafunc.c
+    * change of the behavior of DbUseArea opening, so that one behaves like made Clipper, when it fails the
+      opening of a table, does not recover the previous area. 
+
 2007-05-04 10:15 UTC+0100 Miguel Angel Marchuet (miguelangel/at/marchuet.net)
   + contrib/bmdbfcdx/Makefile
   + contrib/bmdbfcdx/bmdbfcdx1.c
diff --git a/harbour/source/rdd/wafunc.c b/harbour/source/rdd/wafunc.c
index d3de423dfc..826b334a89 100644
--- a/harbour/source/rdd/wafunc.c
+++ b/harbour/source/rdd/wafunc.c
@@ -578,7 +578,7 @@ ERRCODE hb_rddOpenTable( const char * szFileName, const char * szDriver,
    char szDriverBuffer[ HARBOUR_MAX_RDD_DRIVERNAME_LENGTH + 1 ];
    DBOPENINFO pInfo;
    ERRCODE errCode;
-   USHORT uiPrevArea;
+   //USHORT uiPrevArea;
    AREAP pArea;
 
    /* Clipper clears NETERR flag before RT error below */
@@ -600,7 +600,7 @@ ERRCODE hb_rddOpenTable( const char * szFileName, const char * szDriver,
       szDriver = hb_rddDefaultDrv( NULL );
    }
 
-   uiPrevArea = hb_rddGetCurrentWorkAreaNumber();
+   //uiPrevArea = hb_rddGetCurrentWorkAreaNumber();
 
    /*
     * 0 means chose first available in hb_rddInsertAreaNode()
@@ -649,12 +649,15 @@ ERRCODE hb_rddOpenTable( const char * szFileName, const char * szDriver,
       {
          /* Open file */
          errCode = SELF_OPEN( pArea, &pInfo );
-
+         /*-----------------04/05/2007 11:00-----------------
+          * Clipper not restore the old workarea
+          * --------------------------------------------------*/
+         /*
          if( errCode != SUCCESS )
          {
             hb_rddReleaseCurrentArea();
             hb_rddSelectWorkAreaNumber( uiPrevArea );
-         }
+         }*/
       }
    }