Mercurial > emacs
comparison src/frame.c @ 8244:15d4c2bd29e6
[MULTI_FRAME] (Fframe_parameters): For non-X frames,
fill in menu-bar-lines value.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 14 Jul 1994 03:44:29 +0000 |
parents | 32fbb27091d4 |
children | 8f227ebb7748 |
comparison
equal
deleted
inserted
replaced
8243:bf7b3b969ab5 | 8244:15d4c2bd29e6 |
---|---|
1401 store_in_alist (&alist, Qminibuffer, | 1401 store_in_alist (&alist, Qminibuffer, |
1402 (! FRAME_HAS_MINIBUF_P (f) ? Qnil | 1402 (! FRAME_HAS_MINIBUF_P (f) ? Qnil |
1403 : FRAME_MINIBUF_ONLY_P (f) ? Qonly | 1403 : FRAME_MINIBUF_ONLY_P (f) ? Qonly |
1404 : FRAME_MINIBUF_WINDOW (f))); | 1404 : FRAME_MINIBUF_WINDOW (f))); |
1405 store_in_alist (&alist, Qunsplittable, (FRAME_NO_SPLIT_P (f) ? Qt : Qnil)); | 1405 store_in_alist (&alist, Qunsplittable, (FRAME_NO_SPLIT_P (f) ? Qt : Qnil)); |
1406 #if 0 /* This ought to be correct in f->param_alist. */ | |
1407 store_in_alist (&alist, Qmenu_bar_lines, | |
1408 (FRAME_MENU_BAR_LINES (f) | |
1409 ? FRAME_MENU_BAR_LINES (f) | |
1410 : FRAME_EXTERNAL_MENU_BAR (f))); | |
1411 #endif | |
1412 | 1406 |
1413 /* I think this should be done with a hook. */ | 1407 /* I think this should be done with a hook. */ |
1414 #ifdef HAVE_X_WINDOWS | 1408 #ifdef HAVE_X_WINDOWS |
1415 if (FRAME_X_P (f)) | 1409 if (FRAME_X_P (f)) |
1416 x_report_frame_params (f, &alist); | 1410 x_report_frame_params (f, &alist); |
1411 else | |
1417 #endif | 1412 #endif |
1413 /* This ought to be correct in f->param_alist for an X frame. */ | |
1414 store_in_alist (&alist, Qmenu_bar_lines, FRAME_MENU_BAR_LINES (f)); | |
1418 return alist; | 1415 return alist; |
1419 } | 1416 } |
1420 | 1417 |
1421 DEFUN ("modify-frame-parameters", Fmodify_frame_parameters, | 1418 DEFUN ("modify-frame-parameters", Fmodify_frame_parameters, |
1422 Smodify_frame_parameters, 2, 2, 0, | 1419 Smodify_frame_parameters, 2, 2, 0, |