X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/fcd42c11c0e0e5fa3ab931ad2126b1d855ba240f..3fa2054efdfa3c22456072254e6c67682a595233:/src/xfns.c
diff --git a/src/xfns.c b/src/xfns.c
index ecd1ce7bc9..38aa5b3bbf 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -42,8 +42,6 @@ along with GNU Emacs. If not, see . */
#include "termchar.h"
#include "font.h"
-#ifdef HAVE_X_WINDOWS
-
#include
#include
@@ -1470,9 +1468,8 @@ x_set_scroll_bar_default_width (struct frame *f)
int minw = 16;
#endif
/* A minimum width of 14 doesn't look good for toolkit scroll bars. */
- int width = minw + 2 * VERTICAL_SCROLL_BAR_WIDTH_TRIM;
- FRAME_CONFIG_SCROLL_BAR_COLS (f) = (width + wid - 1) / wid;
- FRAME_CONFIG_SCROLL_BAR_WIDTH (f) = width;
+ FRAME_CONFIG_SCROLL_BAR_COLS (f) = (minw + wid - 1) / wid;
+ FRAME_CONFIG_SCROLL_BAR_WIDTH (f) = minw;
#else
/* Make the actual width at least 14 pixels and a multiple of a
character width. */
@@ -6186,5 +6183,3 @@ When using Gtk+ tooltips, the tooltip face is not used. */);
defsubr (&Sx_select_font);
#endif
}
-
-#endif /* HAVE_X_WINDOWS */