diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index fae021a255..dbb8216a5f 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -16,6 +16,10 @@
    The license applies to all entries newer than 2009-04-28.
 */
 
+2011-05-13 17:41 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
+  * contrib/hbwin/win_svc.c
+    ! typo in prev
+
 2011-05-13 17:32 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
   * contrib/hbwin/hbwin.ch
   * contrib/hbwin/win_svc.c
diff --git a/harbour/contrib/hbwin/win_svc.c b/harbour/contrib/hbwin/win_svc.c
index 4290484eef..12cebc0635 100644
--- a/harbour/contrib/hbwin/win_svc.c
+++ b/harbour/contrib/hbwin/win_svc.c
@@ -223,7 +223,7 @@ HB_FUNC( WIN_SERVICEINSTALL )
                                  lpDisplayName,                /* service name to display */
                                  SERVICE_ALL_ACCESS,           /* desired access */
                                  SERVICE_WIN32_OWN_PROCESS,    /* service type */
-                                 HB_ISNUM( 3 ) ? ( DWORD ) hb_parnl( 3 ) : SERVICE_DEMAND_START,
+                                 HB_ISNUM( 4 ) ? ( DWORD ) hb_parnl( 4 ) : SERVICE_DEMAND_START,
                                                                /* start type */
                                  SERVICE_ERROR_NORMAL,         /* error control type */
                                  lpPath,                       /* path to service's binary */