mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-17 10:27:41 +00:00
Fix ignored Motif scrollbar resources (Bug#37359)
* src/xterm.c (x_create_toolkit_scroll_bar): On Motif scrollbars, "foreground" has no meaning, while "background" means the truck and arrow colors, and "trough" means the background of the entire widget. This fix hooks up the Emacs scrollbar "foreground" color to the XmNbackground resource and the "background" color to XmNtroughColor which is more in line with how Xaw scrollbars behave. Copyright-paperwork-exempt: yes
This commit is contained in:
parent
79a01866a0
commit
6eb122c8db
1 changed files with 4 additions and 2 deletions
|
|
@ -6087,17 +6087,19 @@ x_create_toolkit_scroll_bar (struct frame *f, struct scroll_bar *bar)
|
|||
XtSetArg (av[ac], XmNincrement, 1); ++ac;
|
||||
XtSetArg (av[ac], XmNpageIncrement, 1); ++ac;
|
||||
|
||||
/* Note: "background" is the thumb color, and "trough" is the color behind
|
||||
everything. */
|
||||
pixel = f->output_data.x->scroll_bar_foreground_pixel;
|
||||
if (pixel != -1)
|
||||
{
|
||||
XtSetArg (av[ac], XmNforeground, pixel);
|
||||
XtSetArg (av[ac], XmNbackground, pixel);
|
||||
++ac;
|
||||
}
|
||||
|
||||
pixel = f->output_data.x->scroll_bar_background_pixel;
|
||||
if (pixel != -1)
|
||||
{
|
||||
XtSetArg (av[ac], XmNbackground, pixel);
|
||||
XtSetArg (av[ac], XmNtroughColor, pixel);
|
||||
++ac;
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Reference in a new issue