(XTset_vertical_scroll_bar): Fix previous change. Clear

under scroll bar with width FRAME_SCROLL_BAR_COLS.

diff --git a/src/xterm.c b/src/xterm.c
index 57f7e1b800578b679a79b35a4b56ca6a8a5ac5e1..ac945e144b5bb88fbec25307f88a8ee9783ca0ec 100644 (file)
--- a/src/xterm.c
+++ b/src/xterm.c
@@ -7929,7 +7929,8 @@ XTset_vertical_scroll_bar (w, portion, whole, position)
         for them on the frame, we have to clear "under" them.  */
       XClearArea (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f),
                  pixel_left, pixel_top,
-                 pixel_width + 1, pixel_height, False);
+                 FRAME_SCROLL_BAR_COLS (f) * CANON_X_UNIT (f),
+                 pixel_height, False);
 
       /* Move/size the scroll bar widget.  */
       if (mask)