diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index e3a4888b00..2b9aa834ea 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -16,6 +16,11 @@
    The license applies to all entries newer than 2009-04-28.
 */
 
+2010-08-04 08:01 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
+  * contrib/hbide/idedocks.prg
+    % Fixed: a nasty bug which surfaces at some new installation.
+      Reported on FWH forum.
+
 2010-08-03 14:27 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
   * config/postinst.hbs
     ! Fixed to only do install tasks in install build phase.
diff --git a/harbour/contrib/hbide/idedocks.prg b/harbour/contrib/hbide/idedocks.prg
index 405cbed745..fc00b7c4c5 100644
--- a/harbour/contrib/hbide/idedocks.prg
+++ b/harbour/contrib/hbide/idedocks.prg
@@ -354,7 +354,9 @@ METHOD IdeDocks:buildDialog()
 #endif
       ELSE
          FOR EACH a_ IN x_
-            ::oIde:aMdies[ a_:__enumIndex() ]:setGeometry( a_[ 2 ] )
+            IF !empty( a_[ 2 ] )
+               ::oIde:aMdies[ a_:__enumIndex() ]:setGeometry( a_[ 2 ] )
+            ENDIF
             ::oIde:aMdies[ a_:__enumIndex() ]:setWindowState( a_[ 4 ] )
          NEXT
       ENDIF