mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-04 11:40:22 +00:00
Implement the buttonForeground resource
* lwlib/xlwmenu.c (draw_shadow_rectangle, draw_shadow_rhombus): Use the buttonForeground resource color (bug#51988).
This commit is contained in:
parent
bc99604c7a
commit
2ba7d1e84e
@ -641,6 +641,21 @@ draw_shadow_rectangle (XlwMenuWidget mw,
|
||||
int thickness = !x && !y ? mw->menu.border_thickness : mw->menu.shadow_thickness;
|
||||
XPoint points [4];
|
||||
|
||||
if (!erase_p && width == height && width == toggle_button_width (mw))
|
||||
{
|
||||
points [0].x = x;
|
||||
points [0].y = y;
|
||||
points [1].x = x + width;
|
||||
points [1].y = y;
|
||||
points [2].x = x + width;
|
||||
points [2].y = y + height;
|
||||
points [3].x = x;
|
||||
points [3].y = y + height;
|
||||
XFillPolygon (dpy, window,
|
||||
down_p ? mw->menu.button_gc : mw->menu.inactive_button_gc,
|
||||
points, 4, Convex, CoordModeOrigin);
|
||||
}
|
||||
|
||||
if (!erase_p && down_p)
|
||||
{
|
||||
GC temp;
|
||||
@ -704,6 +719,21 @@ draw_shadow_rhombus (XlwMenuWidget mw,
|
||||
int thickness = mw->menu.shadow_thickness;
|
||||
XPoint points [4];
|
||||
|
||||
if (!erase_p && width == height && width == radio_button_width (mw))
|
||||
{
|
||||
points [0].x = x;
|
||||
points [0].y = y + width / 2;
|
||||
points [1].x = x + height / 2;
|
||||
points [1].y = y + width;
|
||||
points [2].x = x + height;
|
||||
points [2].y = y + width / 2;
|
||||
points [3].x = x + height / 2;
|
||||
points [3].y = y;
|
||||
XFillPolygon (dpy, window,
|
||||
down_p ? mw->menu.button_gc : mw->menu.inactive_button_gc,
|
||||
points, 4, Convex, CoordModeOrigin);
|
||||
}
|
||||
|
||||
if (!erase_p && down_p)
|
||||
{
|
||||
GC temp;
|
||||
|
Loading…
Reference in New Issue
Block a user