diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index feb31c9a96..8ad68a3548 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,7 @@
+19991109-01:09 GMT+1 Victor Szel <info@szelvesz.hu>
+  * source/rtl/filesys.c
+    ! tell() changed to lseek() for Posix (tell() is not a Posix function)
+
 19991108-23:41 GMT+1 Victor Szel <info@szelvesz.hu>
   * source/rtl/filesys.c
     % hb_fsWrite(), hb_fsReadLarge(), hb_fsWriteLarge() double var 
diff --git a/harbour/source/rtl/filesys.c b/harbour/source/rtl/filesys.c
index c6c65bbff5..45f8ce3a6c 100644
--- a/harbour/source/rtl/filesys.c
+++ b/harbour/source/rtl/filesys.c
@@ -557,7 +557,7 @@ USHORT  hb_fsWrite( FHANDLE hFileHandle, BYTE * pBuff, USHORT uiCount )
    else
    {
       uiWritten = 0;
-      ftruncate( hFileHandle, tell( hFileHandle ) );
+      ftruncate( hFileHandle, lseek( hFileHandle, 0L, SEEK_CUR ) );
    }
    s_uiErrorLast = errno;
 
@@ -677,7 +677,7 @@ ULONG   hb_fsWriteLarge( FHANDLE hFileHandle, BYTE * pBuff, ULONG ulCount )
    else
    {
       ulWritten = 0;
-      ftruncate( hFileHandle, tell( hFileHandle ) );
+      ftruncate( hFileHandle, lseek( hFileHandle, 0L, SEEK_CUR ) );
    }
    s_uiErrorLast = errno;