diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 3a9fee324c..8497b7139c 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -17,6 +17,10 @@
    past entries belonging to author(s): Viktor Szakats.
 */
 
+2009-07-31 12:33 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
+  * source/rtl/hbinet.c
+    % Minor internal type cleanup.
+
 2009-07-31 12:29 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
   * source/rtl/hbinet.c
     % Cleaned old error description handling logic. Now the error
diff --git a/harbour/source/rtl/hbinet.c b/harbour/source/rtl/hbinet.c
index a96e0d4d70..138055d4dc 100644
--- a/harbour/source/rtl/hbinet.c
+++ b/harbour/source/rtl/hbinet.c
@@ -878,7 +878,7 @@ HB_FUNC( HB_INETDATAREADY )
 }
 
 
-static void s_inetSendInternal( int iMode )
+static void s_inetSendInternal( BOOL lAll )
 {
    PHB_SOCKET_STRUCT socket = HB_PARSOCKET( 1 );
    PHB_ITEM pBuffer = hb_param( 2, HB_IT_STRING );
@@ -910,7 +910,7 @@ static void s_inetSendInternal( int iMode )
          if( iLen > 0 )
          {
             iSent += iLen;
-            if( iMode == 0 )
+            if( ! lAll )
                break;
          }
          else
@@ -929,12 +929,12 @@ static void s_inetSendInternal( int iMode )
 
 HB_FUNC( HB_INETSEND )
 {
-   s_inetSendInternal( 0 );
+   s_inetSendInternal( FALSE );
 }
 
 HB_FUNC( HB_INETSENDALL )
 {
-   s_inetSendInternal( 1 );
+   s_inetSendInternal( TRUE );
 }