diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 21cb20819e..e61f50a702 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,8 @@
+2000-07-31 14:32 UTC+0100 Victor Szakats <info@szelvesz.hu>
+
+   * utils/hbdoc/ft_funcs.prg
+     ! Fixed to match changed strong typing syntax.
+
 2000-07-31 11:23 CET Patrick Mast <eMail@PatrickMast.com>
    * contrib/hbzlib/doc/zip.txt
      * Changes and corrections.
diff --git a/harbour/utils/hbdoc/ft_funcs.prg b/harbour/utils/hbdoc/ft_funcs.prg
index 21da04b46f..a7edb98748 100644
--- a/harbour/utils/hbdoc/ft_funcs.prg
+++ b/harbour/utils/hbdoc/ft_funcs.prg
@@ -43,12 +43,12 @@ DECLARE  FT_FUSE(CFILE AS STRING,NMODE AS NUMERIC) AS NUMERIC
 DECLARE  ft_FEOF() AS LOGICAL
 DECLARE  FReadLn(  cLine ) AS STRING
 DECLARE  FT_FReadLn() AS STRING
-DECLARE  FT_FGotop()  AS VARIANT
-DECLARE  FT_FSKIP(n AS NUMERIC) AS VARIANT
-DECLARE  FT_MKDIR( CDIR AS STRING) AS VARIANT
-DECLARE  StrPos( cBuffer AS STRING  ) AS NUMERIC
-DECLARE  GetNumberofTableItems( cBuffer AS STRING) AS NUMERIC
-DECLARE  FREADline( nH AS NUMERIC, @cB AS STRING, nMaxLine AS NUMERIC)
+DECLARE  FT_FGotop()  AS USUAL
+DECLARE  FT_FSKIP(n AS NUMERIC) AS USUAL
+DECLARE  FT_MKDIR( CDIR AS STRING ) AS USUAL
+DECLARE  StrPos( cBuffer AS STRING ) AS NUMERIC
+DECLARE  GetNumberofTableItems( cBuffer AS STRING ) AS NUMERIC
+DECLARE  FREADline( nH AS NUMERIC, @cB AS STRING, nMaxLine AS NUMERIC )
 DECLARE  FILEBASE() AS OBJECT
 STATIC TheHandle As Object
 /****