Mercurial > emacs
changeset 4617:807ba8bcc309
(x_set_frame_parameters): Don't die if just one of
height and width was set. Likewise left and top.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 14 Aug 1993 07:20:08 +0000 |
| parents | f2f13eeb1c2e |
| children | e4a5c21eb300 |
| files | src/xfns.c |
| diffstat | 1 files changed, 13 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/xfns.c Sat Aug 14 07:14:13 1993 +0000 +++ b/src/xfns.c Sat Aug 14 07:20:08 1993 +0000 @@ -396,6 +396,18 @@ } } + /* Don't die if just one of these was set. */ + if (EQ (left, Qunbound)) + XSET (left, Lisp_Int, f->display.x->left_pos); + if (EQ (top, Qunbound)) + XSET (top, Lisp_Int, f->display.x->top_pos); + + /* Don't die if just one of these was set. */ + if (EQ (width, Qunbound)) + XSET (width, Lisp_Int, FRAME_WIDTH (f)); + if (EQ (height, Qunbound)) + XSET (height, Lisp_Int, FRAME_HEIGHT (f)); + /* Don't set these parameters these unless they've been explicitly specified. The window might be mapped or resized while we're in this function, and we don't want to override that unless the lisp @@ -408,6 +420,7 @@ Lisp_Object frame; XSET (frame, Lisp_Frame, f); + if ((NUMBERP (width) && XINT (width) != FRAME_WIDTH (f)) || (NUMBERP (height) && XINT (height) != FRAME_HEIGHT (f))) Fset_frame_size (frame, width, height);