# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 974903258 0
# Node ID e0e2461a24fe624608d2d2cc0de80e0f79417d8f
# Parent  e7c4d54b3991cafde289514175ff9206dde5e25a
(x_set_tool_bar_lines): Clear internal border when
tool bar gets smaller.

diff -r e7c4d54b3991 -r e0e2461a24fe src/xfns.c
--- a/src/xfns.c	Wed Nov 22 14:07:59 2000 +0000
+++ b/src/xfns.c	Wed Nov 22 14:27:38 2000 +0000
@@ -2045,6 +2045,21 @@
       clear_current_matrices (f);
       updating_frame = NULL;
     }
+
+  /* If the tool bar gets smaller, the internal border below it
+     has to be cleared.  It was formerly part of the display
+     of the larger tool bar, and updating windows won't clear it.  */
+  if (delta < 0)
+    {
+      int height = FRAME_INTERNAL_BORDER_WIDTH (f);
+      int width = PIXEL_WIDTH (f);
+      int y = nlines * CANON_Y_UNIT (f);
+
+      BLOCK_INPUT;
+      XClearArea (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f),
+		  0, y, width, height, False);
+      UNBLOCK_INPUT;
+    }
 }