From e90dbbd17e7e5cffb43fe1cadf0dc0a21e3c2a31 Mon Sep 17 00:00:00 2001
From: Gerd Moellmann <gerd@gnu.org>
Date: Thu, 19 Aug 1999 13:56:14 +0000
Subject: [PATCH] (XTset_vertical_scroll_bar): Fix previous change.  Clear
 under scroll bar with width FRAME_SCROLL_BAR_COLS.

---
 src/xterm.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/xterm.c b/src/xterm.c
index 57f7e1b800..ac945e144b 100644
--- 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)
-- 
2.39.2