Tab expand fixed bug

2001-07-06 09:37:56 +00:00
parent f831ab4366
commit 1ba39e4215
1 changed files with 2 additions and 1 deletions
--- a/harbour/source/rtl/mlcount.c
+++ b/harbour/source/rtl/mlcount.c
@@ -76,6 +76,7 @@ HB_FUNC( MLCOUNT )
      {
         case HB_CHAR_HT:
            ulCurLength = ( ( ULONG ) ( ulCurLength / ulTabLength ) * ulTabLength ) + ulTabLength;
+            ulLastSpace = ulCurLength;
            break;

         case HB_CHAR_LF:
@@ -117,4 +118,4 @@ HB_FUNC( MLCOUNT )
      ulLines++;

   hb_retnl( ulLines );
-}
+}