diff --git a/harbour/source/rtl/gtapi.c b/harbour/source/rtl/gtapi.c
index e32b82162a..e3037f8897 100644
--- a/harbour/source/rtl/gtapi.c
+++ b/harbour/source/rtl/gtapi.c
@@ -6,7 +6,7 @@
  *  GTAPI.C: Generic Terminal for Harbour
  *
  * Latest mods:
- * 1.37   19990726   ptucker   
+ * 1.38   19990726   ptucker   
  * 1.35   19990726   ptucker   Much improved box drawing speed
  *                             Modifed some if statments to test for != 0
  * 1.34   19990721   ptucker   Corrected _Color mask descriptions
@@ -131,7 +131,7 @@ int hb_gtBox (USHORT uiTop, USHORT uiLeft, USHORT uiBottom, USHORT uiRight, char
 
     uiCol = (height > 1 ? uiLeft + 1 : uiLeft);
 
-    if( uiCol <= (height > 1 ? uiRight : uiRight -1 ) )
+    if( uiCol <= uiRight )
     {
        hb_gtRepChar( uiRow, uiCol, pszBox[1], uiRight - uiLeft + (height > 1 ? -1: 1 ));
        if( height > 1 )