(XTset_vertical_scroll_bar) [!USE_TOOLKIT_SCROLL_BARS]:

Fix clearning in the case of scroll bars on the right.

diff --git a/src/ChangeLog b/src/ChangeLog
index bd6b5dfe704ff62becd9709f5cfb752442e1169a..dc42d2d7717deeabec3d1daea8c2e2fdc067842c 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2001-10-26  Gerd Moellmann  <gerd@gnu.org>
+
+       * xterm.c (XTset_vertical_scroll_bar) [!USE_TOOLKIT_SCROLL_BARS]:
+       Fix clearing in the case of scroll bars on the right.
+       
 2001-10-26  Juanma Barranquero <lektu@terra.es>
 
        * w32gui.h (XImage): Add a dummy typedef.

diff --git a/src/xterm.c b/src/xterm.c
index d23593e3d2afe8ab71a06b58f1ca7f3deada85b6..5e48bbdf9dcc15f10e943720b8ab8e2aa7b08ad6 100644 (file)
--- a/src/xterm.c
+++ b/src/xterm.c
@@ -9253,10 +9253,16 @@ XTset_vertical_scroll_bar (w, portion, whole, position)
       {
        int area_width = FRAME_SCROLL_BAR_COLS (f) * CANON_X_UNIT (f);
        int rest = area_width - sb_width;
-       if (rest > 0)
-         x_clear_area (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f),
-                       left + area_width -  rest, top,
-                       rest, max (height, 1), False);
+       if (rest > 0 && height > 0)
+         {
+           if (FRAME_HAS_VERTICAL_SCROLL_BARS_ON_LEFT (f))
+             x_clear_area (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f),
+                           left + area_width -  rest, top,
+                           rest, height, False);
+           else
+             x_clear_area (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f),
+                           left, top, rest, height, False);
+         }
       }
       
       /* Move/size the scroll bar window.  */