# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 753942806 0
# Node ID 2a019dd8ed5178d8a867cc48e8a6bc2cc0195b0d
# Parent  2df44d5e75eb070cacf680469fc957f6e7bb7af1
(x_set_frame_parameters): Call check_frame_size
before Fset_frame_size and Fset_frame_position.

diff -r 2df44d5e75eb -r 2a019dd8ed51 src/xfns.c
--- a/src/xfns.c	Mon Nov 22 04:04:46 1993 +0000
+++ b/src/xfns.c	Mon Nov 22 04:33:26 1993 +0000
@@ -419,6 +419,8 @@
   {
     Lisp_Object frame;
 
+    check_frame_size (f, &height, &width);
+
     XSET (frame, Lisp_Frame, f);
 
     if ((NUMBERP (width) && XINT (width) != FRAME_WIDTH (f))