# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 850675703 0
# Node ID fe4b95eb15aea53a0a445dd98f1e680f07ac25d9
# Parent  58b38425b4633345916e51891c6cae651adea78c
(x_set_scroll_bar_width): Reject a width that's too small.

diff -r 58b38425b463 -r fe4b95eb15ae src/xfns.c
--- a/src/xfns.c	Sun Dec 15 07:30:24 1996 +0000
+++ b/src/xfns.c	Sun Dec 15 18:48:23 1996 +0000
@@ -1983,6 +1983,10 @@
 	   && XFASTINT (arg) != FRAME_SCROLL_BAR_PIXEL_WIDTH (f))
     {
       int wid = FONT_WIDTH (f->output_data.x->font);
+
+      if (XFASTINT (arg) < 2 * VERTICAL_SCROLL_BAR_WIDTH_TRIM)
+	Fsignal (Qargs_out_of_range, Fcons (arg, Qnil));
+
       FRAME_SCROLL_BAR_PIXEL_WIDTH (f) = XFASTINT (arg);
       FRAME_SCROLL_BAR_COLS (f) = (XFASTINT (arg) + wid-1) / wid;
       if (FRAME_X_WINDOW (f))