From 0353de304cb8328879302d2cd797887de23b6313 Mon Sep 17 00:00:00 2001
From: Petr Chornyj <myorg63@mail.ru>
Date: Sun, 31 Oct 2010 20:53:09 +0000
Subject: [PATCH] 2010-10-31 22:50 UTC+0200 Petr Chornyj (myorg63 at mail.ru)  
 * harbour/src/rtl/hbinet.c     ! HB_INETSERVER fixed to use parameters
 properly       Syntax of HB_INETSERVER is       hb_inetSrver( nPort, [pSocket
 | NIL], [cBindAddr], [nListenLimit] )

---
 harbour/ChangeLog        | 6 ++++++
 harbour/src/rtl/hbinet.c | 4 ++--
 2 files changed, 8 insertions(+), 2 deletions(-)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 2ef50ad3be..cea6f5a354 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -16,6 +16,12 @@
    The license applies to all entries newer than 2009-04-28.
 */
 
+2010-10-31 22:50 UTC+0200 Petr Chornyj (myorg63 at mail.ru)
+  * harbour/src/rtl/hbinet.c
+    ! HB_INETSERVER fixed to use parameters properly
+      Syntax of HB_INETSERVER is
+      hb_inetSrver( nPort, [pSocket | NIL], [cBindAddr], [nListenLimit] )
+
 2010-10-31 13:11 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
   * harbour/contrib/hbhpdf/harupdf.c
     ! fixed typo
diff --git a/harbour/src/rtl/hbinet.c b/harbour/src/rtl/hbinet.c
index 85f61f6dc3..cb90b6aa0d 100644
--- a/harbour/src/rtl/hbinet.c
+++ b/harbour/src/rtl/hbinet.c
@@ -1124,8 +1124,8 @@ HB_FUNC( HB_INETSERVER )
    else
    {
       int iPort = hb_parni( 1 );
-      const char * szAddress = hb_parc( 2 );
-      int iListen = hb_parnidef( 3, 10 );
+      const char * szAddress = hb_parc( 3 );
+      int iListen = hb_parnidef( 4, 10 );
 
       if( socket->remote )
          hb_xfree( socket->remote );