master 822350d198: Fix cursor color adjustment on Haiku

[Po Lu]

branch: master
commit 822350d1984bf478becee57e8eede297ac3753d0
Author: Po Lu <luangruo@yahoo.com>
Commit: Po Lu <luangruo@yahoo.com>

    Fix cursor color adjustment on Haiku
    
    * src/haikufns.c (haiku_set_foreground_color): Maybe set cursor
    color correctly if it was equal to the old foreground color.
---
 src/haikufns.c | 8 +-------
 1 file changed, 1 insertion(+), 7 deletions(-)

diff --git a/src/haikufns.c b/src/haikufns.c
index a08b43879e..cf64eff702 100644
--- a/src/haikufns.c
+++ b/src/haikufns.c
@@ -639,14 +639,8 @@ haiku_set_foreground_color (struct frame *f, Lisp_Object 
arg, Lisp_Object oldval
 
   if (FRAME_HAIKU_WINDOW (f))
     {
-
       if (output->cursor_color.pixel == old_fg)
-       {
-         output->cursor_color.pixel = old_fg;
-         output->cursor_color.red = RED_FROM_ULONG (old_fg);
-         output->cursor_color.green = GREEN_FROM_ULONG (old_fg);
-         output->cursor_color.blue = BLUE_FROM_ULONG (old_fg);
-       }
+       haiku_query_color (fg, &output->cursor_color);
 
       update_face_from_frame_parameter (f, Qforeground_color, arg);