diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 97ba6c7506..c25e304b7e 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -17,6 +17,10 @@
    past entries belonging to author(s): Viktor Szakats.
 */
 
+2009-07-03 22:14 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
+  * contrib/xhb/hboutdbg.c
+    ! Fixed potential memory corruption revealed by recently removed cast.
+
 2009-07-03 22:04 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
   * contrib/xhb/freadlin.c
   * examples/hbdoc/hbdfrdln.c
diff --git a/harbour/contrib/xhb/hboutdbg.c b/harbour/contrib/xhb/hboutdbg.c
index c831a00e8c..d0391b71b7 100644
--- a/harbour/contrib/xhb/hboutdbg.c
+++ b/harbour/contrib/xhb/hboutdbg.c
@@ -104,9 +104,6 @@ static void debugInit( void )
 
    if( iFifoResult == 0 || iFifoResult == EEXIST )
    {
-      if( strlen( pFileName->szName ) > 20 )
-         pFileName->szName[ 20 ] = '\0';
-
       hb_snprintf( szDebugTitle, sizeof( szDebugTitle ), "%s - Debug", pFileName->szName );
 
       iPid = fork();