# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 774463841 0
# Node ID 1a0af0f4fb1d419dde03122a10ee76e3d9083e03
# Parent  7fa23d45ccfdf258e4da87ccbeded30f90d11212
(Fx_create_frame): Use 140 as default font size.

diff -r 7fa23d45ccfd -r 1a0af0f4fb1d src/xfns.c
--- a/src/xfns.c	Sun Jul 17 06:41:53 1994 +0000
+++ b/src/xfns.c	Sun Jul 17 16:50:41 1994 +0000
@@ -2327,16 +2327,16 @@
       font = x_new_font (f, XSTRING (font)->data);
     /* Try out a font which we hope has bold and italic variations.  */
     if (!STRINGP (font))
-      font = x_new_font (f, "-misc-fixed-medium-r-normal-*-*-120-*-*-c-*-iso8859-1");
+      font = x_new_font (f, "-misc-fixed-medium-r-normal-*-*-140-*-*-c-*-iso8859-1");
     if (! STRINGP (font))
-      font = x_new_font (f, "-*-*-medium-r-normal-*-*-120-*-*-c-*-iso8859-1");
+      font = x_new_font (f, "-*-*-medium-r-normal-*-*-140-*-*-c-*-iso8859-1");
     if (! STRINGP (font))
       /* This was formerly the first thing tried, but it finds too many fonts
 	 and takes too long.  */
       font = x_new_font (f, "-*-*-medium-r-*-*-*-*-*-*-c-*-iso8859-1");
     /* If those didn't work, look for something which will at least work.  */
     if (! STRINGP (font))
-      font = x_new_font (f, "-*-fixed-*-*-*-*-*-120-*-*-c-*-iso8859-1");
+      font = x_new_font (f, "-*-fixed-*-*-*-*-*-140-*-*-c-*-iso8859-1");
     UNBLOCK_INPUT;
     if (! STRINGP (font))
       font = build_string ("fixed");