diff options
| author | Jan Djärv | 2002-01-21 19:23:48 +0000 |
|---|---|---|
| committer | Jan Djärv | 2002-01-21 19:23:48 +0000 |
| commit | 5f9338d54b4d2888add8d600a8329935afe46db6 (patch) | |
| tree | f3b76db89fed253f9658664e5572985c42008399 /src | |
| parent | 029a305c190167d1b11e434a246196e7782c121a (diff) | |
| download | emacs-5f9338d54b4d2888add8d600a8329935afe46db6.tar.gz emacs-5f9338d54b4d2888add8d600a8329935afe46db6.zip | |
xfns.c (x_set_frame_parameters): Just call x_fullscreen_adjust
if fullscreen is being set.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 5 | ||||
| -rw-r--r-- | src/xfns.c | 8 |
2 files changed, 9 insertions, 4 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 3765c9101e1..dacc029d59e 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2002-01-21 Jan D. <Jan.Djarv@mbox200.swipnet.se> | ||
| 2 | |||
| 3 | * xfns.c (x_set_frame_parameters): Just call x_fullscreen_adjust | ||
| 4 | if fullscreen is being set. | ||
| 5 | |||
| 1 | 2002-01-21 Pavel Jan,Bm(Bk <Pavel@Janik.cz> | 6 | 2002-01-21 Pavel Jan,Bm(Bk <Pavel@Janik.cz> |
| 2 | 7 | ||
| 3 | * minibuf.c (Fminibuffer_contents) | 8 | * minibuf.c (Fminibuffer_contents) |
diff --git a/src/xfns.c b/src/xfns.c index 8fc083510f8..ac6a3fd022e 100644 --- a/src/xfns.c +++ b/src/xfns.c | |||
| @@ -880,6 +880,7 @@ x_set_frame_parameters (f, alist) | |||
| 880 | int i, p; | 880 | int i, p; |
| 881 | int left_no_change = 0, top_no_change = 0; | 881 | int left_no_change = 0, top_no_change = 0; |
| 882 | int icon_left_no_change = 0, icon_top_no_change = 0; | 882 | int icon_left_no_change = 0, icon_top_no_change = 0; |
| 883 | int fullscreen_is_being_set = 0; | ||
| 883 | 884 | ||
| 884 | struct gcpro gcpro1, gcpro2; | 885 | struct gcpro gcpro1, gcpro2; |
| 885 | 886 | ||
| @@ -944,6 +945,7 @@ x_set_frame_parameters (f, alist) | |||
| 944 | register Lisp_Object param_index, old_value; | 945 | register Lisp_Object param_index, old_value; |
| 945 | 946 | ||
| 946 | old_value = get_frame_param (f, prop); | 947 | old_value = get_frame_param (f, prop); |
| 948 | fullscreen_is_being_set = EQ (prop, Qfullscreen); | ||
| 947 | 949 | ||
| 948 | if (NILP (Fequal (val, old_value))) | 950 | if (NILP (Fequal (val, old_value))) |
| 949 | { | 951 | { |
| @@ -1034,7 +1036,7 @@ x_set_frame_parameters (f, alist) | |||
| 1034 | XSETINT (icon_top, 0); | 1036 | XSETINT (icon_top, 0); |
| 1035 | } | 1037 | } |
| 1036 | 1038 | ||
| 1037 | if (FRAME_VISIBLE_P (f)) | 1039 | if (FRAME_VISIBLE_P (f) && fullscreen_is_being_set) |
| 1038 | { | 1040 | { |
| 1039 | /* If the frame is visible already and the fullscreen parameter is | 1041 | /* If the frame is visible already and the fullscreen parameter is |
| 1040 | being set, it is too late to set WM manager hints to specify | 1042 | being set, it is too late to set WM manager hints to specify |
| @@ -1042,9 +1044,7 @@ x_set_frame_parameters (f, alist) | |||
| 1042 | Here we first get the width, height and position that applies to | 1044 | Here we first get the width, height and position that applies to |
| 1043 | fullscreen. We then move the frame to the appropriate | 1045 | fullscreen. We then move the frame to the appropriate |
| 1044 | position. Resize of the frame is taken care of in the code after | 1046 | position. Resize of the frame is taken care of in the code after |
| 1045 | this if-statement. | 1047 | this if-statement. */ |
| 1046 | If fullscreen is not specified, x_fullscreen_adjust returns | ||
| 1047 | the current parameters and then x_fullscreen_move does nothing. */ | ||
| 1048 | int new_left, new_top; | 1048 | int new_left, new_top; |
| 1049 | 1049 | ||
| 1050 | x_fullscreen_adjust (f, &width, &height, &new_top, &new_left); | 1050 | x_fullscreen_adjust (f, &width, &height, &new_top, &new_left); |