diff options
| author | Richard M. Stallman | 2002-09-12 03:26:23 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2002-09-12 03:26:23 +0000 |
| commit | 6155205e82b591c216784f573f8d300db6186765 (patch) | |
| tree | 0feb216af539337a8995afc87e9f52b7642959ed /src | |
| parent | ef3c2c73ce2f3b06400ebc646b1a56444fa62190 (diff) | |
| download | emacs-6155205e82b591c216784f573f8d300db6186765.tar.gz emacs-6155205e82b591c216784f573f8d300db6186765.zip | |
(x_report_frame_params): If FRAME_SCROLL_BAR_PIXEL_WIDTH is 0
and we have non-toolkit scroll bars, return nil for scroll-bar-width.
Diffstat (limited to 'src')
| -rw-r--r-- | src/xfns.c | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/src/xfns.c b/src/xfns.c index 8788906e773..e0cc81a3e47 100644 --- a/src/xfns.c +++ b/src/xfns.c | |||
| @@ -1295,9 +1295,13 @@ x_report_frame_params (f, alistptr) | |||
| 1295 | store_in_alist (alistptr, Qright_fringe, | 1295 | store_in_alist (alistptr, Qright_fringe, |
| 1296 | make_number (f->output_data.x->right_fringe_width)); | 1296 | make_number (f->output_data.x->right_fringe_width)); |
| 1297 | store_in_alist (alistptr, Qscroll_bar_width, | 1297 | store_in_alist (alistptr, Qscroll_bar_width, |
| 1298 | make_number (FRAME_HAS_VERTICAL_SCROLL_BARS (f) | 1298 | (! FRAME_HAS_VERTICAL_SCROLL_BARS (f) |
| 1299 | ? FRAME_SCROLL_BAR_PIXEL_WIDTH(f) | 1299 | ? make_number (0) |
| 1300 | : 0)); | 1300 | : FRAME_SCROLL_BAR_PIXEL_WIDTH (f) > 0 |
| 1301 | ? make_number (FRAME_SCROLL_BAR_PIXEL_WIDTH (f)) | ||
| 1302 | /* nil means "use default width" | ||
| 1303 | for non-toolkit scroll bar */ | ||
| 1304 | : Qnil)); | ||
| 1301 | sprintf (buf, "%ld", (long) FRAME_X_WINDOW (f)); | 1305 | sprintf (buf, "%ld", (long) FRAME_X_WINDOW (f)); |
| 1302 | store_in_alist (alistptr, Qwindow_id, | 1306 | store_in_alist (alistptr, Qwindow_id, |
| 1303 | build_string (buf)); | 1307 | build_string (buf)); |