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.") ...@@ -2104,14 +2104,19 @@ If FRAME is nil, describe the currently selected frame.")
if (FRAME_LIVE_P (f)) if (FRAME_LIVE_P (f))
{ {
value = Fassq (parameter, f->param_alist); if (EQ (parameter, Qname))
if (CONSP (value)) value = f->name;
value = XCDR (value);
else if (EQ (parameter, Qdisplay_type))
/* Avoid consing in a frequent case. */
value = Qnil;
else 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; 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