Mercurial > emacs

comparison src/xterm.c @ 40329:c1762ce8905b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(XTset_vertical_scroll_bar) [!USE_TOOLKIT_SCROLL_BARS]: Fix clearning in the case of scroll bars on the right.
author Gerd Moellmann <gerd@gnu.org>
date Fri, 26 Oct 2001 11:57:25 +0000
parents a725c601ef70
children 712d604d52eb
comparison
equal deleted inserted replaced
40328:f687e0474d22 40329:c1762ce8905b
9251 previous mode line display is cleared after C-x 2 C-x 1, for 9251 previous mode line display is cleared after C-x 2 C-x 1, for
9252 example. */ 9252 example. */
9253 { 9253 {
9254 int area_width = FRAME_SCROLL_BAR_COLS (f) * CANON_X_UNIT (f); 9254 int area_width = FRAME_SCROLL_BAR_COLS (f) * CANON_X_UNIT (f);
9255 int rest = area_width - sb_width; 9255 int rest = area_width - sb_width;
9256 if (rest > 0) 9256 if (rest > 0 && height > 0)
9257 x_clear_area (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f), 9257 {
9258 left + area_width - rest, top, 9258 if (FRAME_HAS_VERTICAL_SCROLL_BARS_ON_LEFT (f))
9259 rest, max (height, 1), False); 9259 x_clear_area (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f),
9260 left + area_width - rest, top,
9261 rest, height, False);
9262 else
9263 x_clear_area (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f),
9264 left, top, rest, height, False);
9265 }
9260 } 9266 }
9261 9267
9262 /* Move/size the scroll bar window. */ 9268 /* Move/size the scroll bar window. */
9263 if (mask) 9269 if (mask)
9264 { 9270 {