From: Jason Rumney <jasonr@gnu.org>
Date: Fri, 27 Oct 2000 18:52:35 +0000 (+0000)
Subject: (Fx_create_frame): Make default fontsize on w32 10 point, as Windows
X-Git-Tag: emacs-pretest-21.0.90~491
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e39649be48c9784c737306f6903227769140129b;p=emacs.git

(Fx_create_frame): Make default fontsize on w32 10 point, as Windows
has oversized fonts.
---

diff --git a/src/w32fns.c b/src/w32fns.c
index 9996594649e..028c7d40659 100644
--- a/src/w32fns.c
+++ b/src/w32fns.c
@@ -5172,7 +5172,7 @@ This function is an internal primitive--use `make-frame' instead.")
       }
     /* Try out a font which we hope has bold and italic variations.  */
     if (!STRINGP (font))
-      font = x_new_font (f, "-*-Courier New-normal-r-*-*-*-120-*-*-c-*-iso8859-1");
+      font = x_new_font (f, "-*-Courier New-normal-r-*-*-*-100-*-*-c-*-iso8859-1");
     if (! STRINGP (font))
       font = x_new_font (f, "-*-Courier-normal-r-*-*-13-*-*-*-c-*-iso8859-1");
     /* If those didn't work, look for something which will at least work.  */
@@ -12012,7 +12012,7 @@ x_create_tip_frame (dpyinfo, parms)
     
     /* Try out a font which we hope has bold and italic variations.  */
     if (!STRINGP (font))
-      font = x_new_font (f, "-adobe-courier-medium-r-*-*-*-120-*-*-*-*-iso8859-1");
+      font = x_new_font (f, "-*-courier new-normal-r-*-*-*-100-*-*-*-*-iso8859-1");
     if (!STRINGP (font))
       font = x_new_font (f, "-misc-fixed-medium-r-normal-*-*-140-*-*-c-*-iso8859-1");
     if (! STRINGP (font))