* xfns.c (Fx_create_frame): Set font parameter directly instead of

	using x_default_parameter, since x_get_args clears the parm alist.

2 files changed, 6 insertions, 2 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 81972796b4a..63475737840 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2006-06-24  Chong Yidong  <cyd@stupidchicken.com>
+
+        * xfns.c (Fx_create_frame): Set font parameter directly instead of
+        using x_default_parameter, since x_get_args clears the parm alist.
+
 2006-06-24  Eli Zaretskii  <eliz@gnu.org>
 
         * dired.c (directory_files_internal) [WINDOWSNT]: Find files
diff --git a/src/xfns.c b/src/xfns.c
index e6772dc65d9..55575d9ec61 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -3189,8 +3189,7 @@ This function is an internal primitive--use `make-frame' instead.  */)
     if (! STRINGP (font))
       font = build_string ("fixed");
 
-    x_default_parameter (f, parms, Qfont, font,
-                         "font", "Font", RES_TYPE_STRING);
+    x_set_frame_parameters (f, Fcons (Fcons (Qfont, font), Qnil));
   }
 
 #ifdef USE_LUCID