Allow setting frame pixel sizes from frame parameters (Bug#21415)

[gnu-emacs] / src / w32term.c

diff --git a/src/w32term.c b/src/w32term.c
index 9dc6b17d1cea6d28da735909b6870f3fda447dd9..bd6070f9091ec25be012afbaeca27cd77309582c 100644 (file)
--- a/src/w32term.c
+++ b/src/w32term.c
@@ -6176,6 +6176,13 @@ x_set_window_size (struct frame *f, bool change_gravity,
 
   if (pixelwidth > 0 || pixelheight > 0)
     {
+      frame_size_history_add
+       (f, Qx_set_window_size_1, width, height,
+        list2 (Fcons (make_number (pixelwidth),
+                      make_number (pixelheight)),
+               Fcons (make_number (rect.right - rect.left),
+                      make_number (rect.bottom - rect.top))));
+
       my_set_window_pos (FRAME_W32_WINDOW (f), NULL,
                         0, 0,
                         rect.right - rect.left,