20000412-04:39 GMT+1 Victor Szakats <info@szelvesz.hu>

harbour/ChangeLog

@@ -1,3 +1,8 @@
+20000412-04:39 GMT+1 Victor Szakats <info@szelvesz.hu>
+
+   * source/rtl/gtapi.c
+     + hb_gtGetColorStr() fixed.
+
 20000412-03:14 GMT+1 Victor Szakats <info@szelvesz.hu>
 
    * source/tools/ctmisc.prg

harbour/source/rtl/gtapi.c

@@ -415,7 +415,7 @@ USHORT hb_gtGetColorStr( char * pszColorString )
          if( j == 0 )
          {
             /* NOTE: When STRICT is on, Harbour will put both the "*" and "+"
-                     chars to the first half of the colorspec (like "W+*/B"), 
+                     chars to the first half of the colorspec (like "W*+/B"), 
                      which is quite ugly, otherwise it will put the "+" to the 
                      first half and the "*" to the second (like "W+/B*"), which
                      is how it should be done. [vszakats] */
@@ -438,8 +438,6 @@ USHORT hb_gtGetColorStr( char * pszColorString )
          }
 #endif
 
-         nColor = ( s_Color[ i ] >> 4 ) & 7;
-
          nColor = ( s_pColor[ uiColorIndex ] >> 4 ) & 7;
       }
    }