diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 2611d7807f..abdb082904 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -17,6 +17,10 @@
    past entries belonging to author(s): Viktor Szakats.
 */
 
+2009-09-23 14:30 UTC+0300 Mindaugas Kavaliauskas (dbtopas/at/dbtopas.lt)
+  * contrib/hbmemio/memio.c
+    ! fixed cleanup code
+
 2009-09-23 00:13 UTC+0300 Mindaugas Kavaliauskas (dbtopas/at/dbtopas.lt)
   * contrib/hbmemio/memio.c
     ! fixed typo in hb_memfsDelete()
diff --git a/harbour/contrib/hbmemio/memio.c b/harbour/contrib/hbmemio/memio.c
index 76bb4ac13c..7e8f21325b 100644
--- a/harbour/contrib/hbmemio/memio.c
+++ b/harbour/contrib/hbmemio/memio.c
@@ -149,7 +149,7 @@ static void memfsInit( void )
    s_fs.ulCount = 0;
    s_fs.ulAlloc = HB_MEMFS_INITSIZE;
    s_fs.pInodes = ( PHB_MEMFS_INODE * ) hb_xgrab( sizeof( PHB_MEMFS_INODE ) * s_fs.ulAlloc );
-   hb_vmAtExit( memfsExit, NULL );
+   hb_vmAtQuit( memfsExit, NULL );
 }