From 5f9338d54b4d2888add8d600a8329935afe46db6 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Jan=20Dj=C3=A4rv?= Date: Mon, 21 Jan 2002 19:23:48 +0000 Subject: [PATCH] xfns.c (x_set_frame_parameters): Just call x_fullscreen_adjust if fullscreen is being set. --- src/ChangeLog | 5 +++++ src/xfns.c | 8 ++++---- 2 files changed, 9 insertions(+), 4 deletions(-) diff --git a/src/ChangeLog b/src/ChangeLog index 3765c9101e..dacc029d59 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,8 @@ +2002-01-21 Jan D. + + * xfns.c (x_set_frame_parameters): Just call x_fullscreen_adjust + if fullscreen is being set. + 2002-01-21 Pavel Jan,Bm(Bk * minibuf.c (Fminibuffer_contents) diff --git a/src/xfns.c b/src/xfns.c index 8fc083510f..ac6a3fd022 100644 --- a/src/xfns.c +++ b/src/xfns.c @@ -880,6 +880,7 @@ x_set_frame_parameters (f, alist) int i, p; int left_no_change = 0, top_no_change = 0; int icon_left_no_change = 0, icon_top_no_change = 0; + int fullscreen_is_being_set = 0; struct gcpro gcpro1, gcpro2; @@ -944,6 +945,7 @@ x_set_frame_parameters (f, alist) register Lisp_Object param_index, old_value; old_value = get_frame_param (f, prop); + fullscreen_is_being_set = EQ (prop, Qfullscreen); if (NILP (Fequal (val, old_value))) { @@ -1034,7 +1036,7 @@ x_set_frame_parameters (f, alist) XSETINT (icon_top, 0); } - if (FRAME_VISIBLE_P (f)) + if (FRAME_VISIBLE_P (f) && fullscreen_is_being_set) { /* If the frame is visible already and the fullscreen parameter is being set, it is too late to set WM manager hints to specify @@ -1042,9 +1044,7 @@ x_set_frame_parameters (f, alist) Here we first get the width, height and position that applies to fullscreen. We then move the frame to the appropriate position. Resize of the frame is taken care of in the code after - this if-statement. - If fullscreen is not specified, x_fullscreen_adjust returns - the current parameters and then x_fullscreen_move does nothing. */ + this if-statement. */ int new_left, new_top; x_fullscreen_adjust (f, &width, &height, &new_top, &new_left); -- 2.20.1