From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Mon, 7 Oct 2019 04:53:17 +0000 (+0200)
Subject: Fix the colours on Motif horizontal scroll bars
X-Git-Tag: emacs-27.0.90~1239
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=78ac0551e77110cfdc9b01fadec19d862b5957c4;p=emacs.git

Fix the colours on Motif horizontal scroll bars

* src/xterm.c (x_create_horizontal_toolkit_scroll_bar): Use the
same foreground/background colours as the vertical scroll bar
(bug#37359).
---

diff --git a/src/xterm.c b/src/xterm.c
index 5baa29a8466..b49c9d6893a 100644
--- a/src/xterm.c
+++ b/src/xterm.c
@@ -6303,17 +6303,19 @@ x_create_horizontal_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;
     }