2010-03-07 12:00 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

* harbour/contrib/xhb/tframe.prg
    % small optimization

harbour/ChangeLog

@@ -17,6 +17,10 @@
    past entries belonging to author(s): Viktor Szakats.
 */
 
+2010-03-07 12:00 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
+  * harbour/contrib/xhb/tframe.prg
+    % small optimization
+
 2010-03-07 11:47 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
   * src/vm/hvm.c
     ! Adjustment to symEval declaration after last change.

harbour/contrib/xhb/tframe.prg

@@ -110,12 +110,10 @@ METHOD StartSet( aRows, aCols, onLoad, onUnload ) CLASS THtmlFrameSet
       cStr += ' rows="'
 
       FOR EACH cItem in aRows
-
-         IF cItem:__enumIndex() < Len( aRows )
-            cStr += cItem + ","
-         ELSE
-            cStr += cItem
+         IF cItem:__enumIndex() > 1
+            cStr += ","
          ENDIF
+         cStr += cItem
       NEXT
 
       cStr += '"'
@@ -126,12 +124,10 @@ METHOD StartSet( aRows, aCols, onLoad, onUnload ) CLASS THtmlFrameSet
       cStr += ' cols="'
 
       FOR EACH cItem IN aCols
-
-         IF cItem:__enumIndex() < Len( aCols )
-            cStr += cItem + ","
-         ELSE
-            cStr += cItem
+         IF cItem:__enumIndex() > 1
+            cStr += ","
          ENDIF
+         cStr += cItem
       NEXT
 
       cStr += '"'