Mercurial > emacs
changeset 40257:98531a716f48
(XTset_vertical_scroll_bar) [!USE_TOOLKIT_SCROLL_BARS]:
Fix clearing of area not covered by scroll bar.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Wed, 24 Oct 2001 14:04:57 +0000 |
| parents | 561bc8b0392f |
| children | d7ed9c0db488 |
| files | src/xterm.c |
| diffstat | 1 files changed, 8 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/src/xterm.c Wed Oct 24 12:37:32 2001 +0000 +++ b/src/xterm.c Wed Oct 24 14:04:57 2001 +0000 @@ -9208,11 +9208,14 @@ /* Does the scroll bar exist yet? */ if (NILP (w->vertical_scroll_bar)) { - BLOCK_INPUT; if (width && height) - x_clear_area (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f), - left, top, width, height, False); - UNBLOCK_INPUT; + { + BLOCK_INPUT; + x_clear_area (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f), + left, top, width, height, False); + UNBLOCK_INPUT; + } + bar = x_scroll_bar_create (w, top, sb_left, sb_width, height); } else @@ -9273,7 +9276,7 @@ int rest = area_width - sb_width; if (rest > 0) x_clear_area (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f), - left + area_width - rest, 0, + left + area_width - rest, top, rest, max (height, 1), False); }