Commit 67d853e6 authored by Gerd Moellmann's avatar Gerd Moellmann

(Fframe_parameter): Handle `name' specially.

parent 0da3ecef
......@@ -2104,14 +2104,19 @@ If FRAME is nil, describe the currently selected frame.")
if (FRAME_LIVE_P (f))
{
value = Fassq (parameter, f->param_alist);
if (CONSP (value))
value = XCDR (value);
else if (EQ (parameter, Qdisplay_type))
/* Avoid consing in a frequent case. */
value = Qnil;
if (EQ (parameter, Qname))
value = f->name;
else
value = Fcdr (Fassq (parameter, Fframe_parameters (frame)));
{
value = Fassq (parameter, f->param_alist);
if (CONSP (value))
value = XCDR (value);
else if (EQ (parameter, Qdisplay_type))
/* Avoid consing in a frequent case. */
value = Qnil;
else
value = Fcdr (Fassq (parameter, Fframe_parameters (frame)));
}
}
return value;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment