[gtkada] Set_Foreground

[Emmanuel Briot]

> If it is a label, do this instead:
> 
>    Gtk_New (My_Label, "<span color=""red"">My red label</span>");
>    Set_Use_Markup (My_Label, True);

I didn't pay attention to the fact that you had a label.
You need to put in an Gtk_Event_Box instead, to have an actual GdkWindow
below.

Emmanuel