mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-01-10 05:30:45 -08:00
(Fx_create_frame): Put all specified parms into f->param_alist
unless they were cleared out.
This commit is contained in:
parent
d00368cf26
commit
5fa98fcf92
1 changed files with 8 additions and 0 deletions
|
|
@ -3008,6 +3008,8 @@ This function is an internal primitive--use `make-frame' instead. */)
|
|||
|
||||
check_x ();
|
||||
|
||||
parms = Fcopy_alist (parms);
|
||||
|
||||
/* Use this general default value to start with
|
||||
until we know if this frame has a specified name. */
|
||||
Vx_resource_name = Vinvocation_name;
|
||||
|
|
@ -3384,6 +3386,12 @@ This function is an internal primitive--use `make-frame' instead. */)
|
|||
|| !FRAME_LIVE_P (XFRAME (kb->Vdefault_minibuffer_frame))))
|
||||
kb->Vdefault_minibuffer_frame = frame;
|
||||
|
||||
/* All remaining specified parameters, which have not been "used"
|
||||
by x_get_arg and friends, now go in the misc. alist of the frame. */
|
||||
for (tem = parms; !NILP (tem); tem = XCDR (tem))
|
||||
if (CONSP (XCAR (tem)) && !NILP (XCAR (XCAR (tem))))
|
||||
f->param_alist = Fcons (XCAR (tem), f->param_alist);
|
||||
|
||||
UNGCPRO;
|
||||
|
||||
/* Make sure windows on this frame appear in calls to next-window
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue