mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-02 08:22:22 +00:00
(x_scroll_bar_clear): Use type test macros.
This commit is contained in:
parent
fdb4a38c7d
commit
9bc4522e80
@ -2978,8 +2978,7 @@ x_scroll_bar_clear (f)
|
||||
{
|
||||
Lisp_Object bar;
|
||||
|
||||
for (bar = FRAME_SCROLL_BARS (f);
|
||||
XTYPE (bar) == Lisp_Vector;
|
||||
for (bar = FRAME_SCROLL_BARS (f); VECTORP (bar);
|
||||
bar = XSCROLL_BAR (bar)->next)
|
||||
XClearArea (x_current_display, SCROLL_BAR_X_WINDOW (XSCROLL_BAR (bar)),
|
||||
0, 0, 0, 0, True);
|
||||
|
Loading…
Reference in New Issue
Block a user