From 494ed4124a79bd6d45c8f30fc0e8bd92959620bd Mon Sep 17 00:00:00 2001
From: Paul Tucker <ptucker@sympatico.ca>
Date: Wed, 8 Sep 1999 16:10:51 +0000
Subject: [PATCH] *** empty log message ***

---
 harbour/ChangeLog          |  5 +++++
 harbour/source/rtl/gtapi.c | 11 +++++++++++
 2 files changed, 16 insertions(+)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index fb9342211d..8cad056742 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,8 @@
+19990908-11:56 EDT Paul Tucker <ptucker@sympatico.ca>
+  * source/rtl/gtapi.c
+    * modified SetColor to accept a null pointer, and do nothing
+    * changed so that "" resets colors to Clipper default.
+
 19990908-17:00 GMT+2 Ryszard Glab <rglab@imid.med.pl>
 
     *source/compiler/harbour.y
diff --git a/harbour/source/rtl/gtapi.c b/harbour/source/rtl/gtapi.c
index 1504e84878..9e34df43a0 100644
--- a/harbour/source/rtl/gtapi.c
+++ b/harbour/source/rtl/gtapi.c
@@ -393,6 +393,17 @@ int hb_gtSetColorStr( char * fpColorString )
    int nColor = 0;
    int nCount = -1, i = 0, y;
 
+   if( !fpColorString )
+      return 1;
+   if( ! *fpColorString )
+   {
+      s_Color[0] = 0x7;
+      s_Color[1] = 0x70;
+      s_Color[2] = 0;
+      s_Color[3] = 0;
+      s_Color[4] = 0x7;
+   }
+        
    do
    {
       c = *fpColorString++;