]> git.eshelyaron.com Git - emacs.git/commitdiff
(Fx_create_frame): Apply 2006-06-24 change for xfns.c.
authorYAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
Wed, 28 Jun 2006 08:30:16 +0000 (08:30 +0000)
committerYAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
Wed, 28 Jun 2006 08:30:16 +0000 (08:30 +0000)
src/macfns.c

index 104dcb0896b8825bd6725b83b1ec938ae2582504..494d6ec1da377999f2fb828b81332919d9a985dc 100644 (file)
@@ -2646,8 +2646,7 @@ This function is an internal primitive--use `make-frame' instead.  */)
       error ("Cannot find any usable font");
     UNBLOCK_INPUT;
 
-    x_default_parameter (f, parms, Qfont, font,
-                        "font", "Font", RES_TYPE_STRING);
+    x_set_frame_parameters (f, Fcons (Fcons (Qfont, font), Qnil));
   }
 
   x_default_parameter (f, parms, Qborder_width, make_number (0),