diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index bcf33d3af9..2e1318787c 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -16,6 +16,12 @@
    The license applies to all entries newer than 2009-04-28.
 */
 
+2011-06-06 15:37 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
+  * contrib/hbide/idechangelog.prg
+  * contrib/hbide/idesaveload.prg
+    + Implemented: to remember the position and size of 
+      ChangeLog(s) dialog.
+
 2011-06-06 14:47 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
   * contrib/hbide/changelog.ui
   * contrib/hbide/idechangelog.prg
diff --git a/harbour/contrib/hbide/idechangelog.prg b/harbour/contrib/hbide/idechangelog.prg
index ec75bc46c7..2aa5c38466 100644
--- a/harbour/contrib/hbide/idechangelog.prg
+++ b/harbour/contrib/hbide/idechangelog.prg
@@ -189,8 +189,11 @@ METHOD IdeChangeLog:show()
       ::qHiliter:hbSetType( 1 )
 
       ::oUI:q_editChangelog   :setText( ::oINI:cChangeLog )
+
+      ::oUI:oWidget:connect( QEvent_Close, {|| ::oIde:oINI:cChangelogDialogGeometry := hbide_posAndSize( ::oUI:oWidget ) } )
    ENDIF
 
+   ::oIde:setPosAndSizeByIniEx( ::oUI:oWidget, ::oINI:cChangelogDialogGeometry )
    ::oUI:show()
 
    RETURN Self
diff --git a/harbour/contrib/hbide/idesaveload.prg b/harbour/contrib/hbide/idesaveload.prg
index 7ae4a7eb24..ed4faf9c30 100644
--- a/harbour/contrib/hbide/idesaveload.prg
+++ b/harbour/contrib/hbide/idesaveload.prg
@@ -92,6 +92,7 @@ CLASS IdeINI INHERIT IdeObject
    DATA   cShortcutsDialogGeometry                INIT  ""
    DATA   cDbStructDialogGeometry                 INIT  ""
    DATA   cTablesDialogGeometry                   INIT  ""
+   DATA   cChangelogDialogGeometry                INIT  ""
    //
    DATA   cRecentTabIndex                         INIT  ""
    //
@@ -339,6 +340,7 @@ METHOD IdeINI:save( cHbideIni )
    aadd( txt_, "SetupDialogGeometry"       + "=" +   ::cSetupDialogGeometry                             )
    aadd( txt_, "DbStructDialogGeometry"    + "=" +   ::cDbStructDialogGeometry                          )
    aadd( txt_, "TablesDialogGeometry"      + "=" +   ::cTablesDialogGeometry                            )
+   aadd( txt_, "ChangelogDialogGeometry"   + "=" +   ::cChangelogDialogGeometry                         )
    //
    aadd( txt_, "CurrentLineHighlightMode"  + "=" +   iif( ::lCurrentLineHighlightEnabled, "YES", "NO" ) )
    aadd( txt_, "LineNumbersDisplayMode"    + "=" +   iif( ::lLineNumbersVisible, "YES", "NO" )          )
@@ -637,6 +639,7 @@ METHOD IdeINI:load( cHbideIni )
                      CASE "ShortcutsDialogGeometry"     ; ::cShortcutsDialogGeometry          := cVal ; EXIT
                      CASE "DbStructDialogGeometry"      ; ::cDbStructDialogGeometry           := cVal ; EXIT
                      CASE "TablesDialogGeometry"        ; ::cTablesDialogGeometry             := cVal ; EXIT
+                     CASE "ChangelogDialogGeometry"     ; ::cChangelogDialogGeometry          := cVal ; EXIT
                      //
                      CASE "CurrentLineHighlightMode"    ; ::oIde:lCurrentLineHighlightEnabled := !( cVal == "NO" ); EXIT
                      CASE "LineNumbersDisplayMode"      ; ::oIde:lLineNumbersVisible          := !( cVal == "NO" ); EXIT