diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 13620df3f6..f3a9901413 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,11 @@
    2002-12-01 13:30 UTC+0100 Foo Bar <foo.bar@foobar.org>
 */
 
+2007-05-06 11:42 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
+   * harbour/source/rtl/hbrandom.c
+     ! HB_RANDOMSEED() fixed to correctly handle passed parameter.
+       (Thanks to Mitja Podgornik)
+
 2007-05-05 12:08 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
    * harbour/source/rtl/tget.prg
      ! Fixed a recently introduced crash in Get():ColorDisp().
diff --git a/harbour/source/rtl/hbrandom.c b/harbour/source/rtl/hbrandom.c
index 10cfdc8e34..1a7ade2585 100644
--- a/harbour/source/rtl/hbrandom.c
+++ b/harbour/source/rtl/hbrandom.c
@@ -122,7 +122,7 @@ HB_FUNC( HB_RANDOMINT )
 
 HB_FUNC( HB_RANDOMSEED )
 {
-   srand( ISNUM( 1 ) ? ( unsigned ) time( NULL ) : ( unsigned ) hb_parni( 1 ) );
+   srand( ISNUM( 1 ) ? ( unsigned ) hb_parni( 1 ) : ( unsigned ) time( NULL ) );
    s_fInit = TRUE;
 }