Mercurial > emacs

comparison src/xfns.c @ 47429:49c23a6bf79f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(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.
author Richard M. Stallman <rms@gnu.org>
date Thu, 12 Sep 2002 03:26:23 +0000
parents 4e4edde4b0a6
children 3891c4b6162f
comparison
equal deleted inserted replaced
47428:eb0020984860 47429:49c23a6bf79f
1293 store_in_alist (alistptr, Qleft_fringe, 1293 store_in_alist (alistptr, Qleft_fringe,
1294 make_number (f->output_data.x->left_fringe_width)); 1294 make_number (f->output_data.x->left_fringe_width));
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));
1304 #ifdef USE_X_TOOLKIT 1308 #ifdef USE_X_TOOLKIT
1305 /* Tooltip frame may not have this widget. */ 1309 /* Tooltip frame may not have this widget. */