(Fframe_parameter): Fix a bug whereby some
``artificial'' frame parameters, like `minibuffer' were not obtained by calling Fframe_parameters.
This commit is contained in:
parent
2726b68bac
commit
75700ff269
2 changed files with 12 additions and 7 deletions
|
@ -1,5 +1,9 @@
|
|||
2001-10-25 Gerd Moellmann <gerd@gnu.org>
|
||||
|
||||
* frame.c (Fframe_parameter): Fix a bug whereby some
|
||||
``artificial'' frame parameters, like `minibuffer' were not
|
||||
obtained by calling Fframe_parameters.
|
||||
|
||||
* xterm.c (show_mouse_face): Clean up. Recognize overwritten
|
||||
cursor differently.
|
||||
|
||||
|
|
15
src/frame.c
15
src/frame.c
|
@ -2085,7 +2085,8 @@ If FRAME is nil, describe the currently selected frame. */)
|
|||
else if (EQ (parameter, Qdisplay) && FRAME_X_P (f))
|
||||
value = XCAR (FRAME_X_DISPLAY_INFO (f)->name_list_element);
|
||||
#endif /* HAVE_X_WINDOWS */
|
||||
else
|
||||
else if (EQ (parameter, Qbackground_color)
|
||||
|| EQ (parameter, Qforeground_color))
|
||||
{
|
||||
value = Fassq (parameter, f->param_alist);
|
||||
if (CONSP (value))
|
||||
|
@ -2120,13 +2121,13 @@ If FRAME is nil, describe the currently selected frame. */)
|
|||
}
|
||||
}
|
||||
}
|
||||
else if (EQ (parameter, Qdisplay_type)
|
||||
|| EQ (parameter, Qbackground_mode))
|
||||
/* Avoid consing in frequent cases. */
|
||||
value = Qnil;
|
||||
else
|
||||
value = Fcdr (Fassq (parameter, Fframe_parameters (frame)));
|
||||
}
|
||||
else if (EQ (parameter, Qdisplay_type)
|
||||
|| EQ (parameter, Qbackground_mode))
|
||||
/* Avoid consing in frequent cases. */
|
||||
value = Fcdr (Fassq (parameter, f->param_alist));
|
||||
else
|
||||
value = Fcdr (Fassq (parameter, Fframe_parameters (frame)));
|
||||
}
|
||||
|
||||
return value;
|
||||
|
|
Loading…
Add table
Reference in a new issue