diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index efa2b5cab3..f029a0fd86 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -17,6 +17,10 @@
    past entries belonging to author(s): Viktor Szakats.
 */
 
+2009-07-28 17:52 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
+  * harbour/source/rtl/hbsocket.c
+    ! fixed typo in recent modification
+
 2009-07-28 17:30 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
   * make_gnu.sh
     ! Restored old sln/crs detection code, to fix creation of hbmk.cfg.
diff --git a/harbour/source/rtl/hbsocket.c b/harbour/source/rtl/hbsocket.c
index a1611b5757..bc9ed87763 100644
--- a/harbour/source/rtl/hbsocket.c
+++ b/harbour/source/rtl/hbsocket.c
@@ -1381,6 +1381,9 @@ BOOL hb_socketInetAddr( void ** pSockAddr, unsigned * puiLen,
    if( !szAddr || !*szAddr )
    {
       sa.sin_addr.s_addr = htonl( INADDR_ANY );
+      *pSockAddr = memcpy( hb_xgrab( sizeof( sa ) + 1 ), &sa, sizeof( sa ) );
+      *puiLen = ( unsigned ) sizeof( sa );
+      return TRUE;
    }
    else
    {
@@ -1427,7 +1430,12 @@ BOOL hb_socketInet6Addr( void ** pSockAddr, unsigned * puiLen,
       memcpy( &sa.sin6_addr, &in6addr_any, sizeof( struct in6_addr ) );
 #elif defined( IN6ADDR_ANY_INIT )
       memcpy( &sa.sin6_addr, &s_in6addr_any, sizeof( struct in6_addr ) );
+#else
+      int TODO;
 #endif
+      *pSockAddr = memcpy( hb_xgrab( sizeof( sa ) + 1 ), &sa, sizeof( sa ) );
+      *puiLen = ( unsigned ) sizeof( sa );
+      return TRUE;
    }
    else
    {