(font-weight-table): Use defaults on w32 that match

LOGFONT.lfWeight.

1 files changed, 24 insertions, 11 deletions

diff --git a/lisp/faces.el b/lisp/faces.el
index 883206a60f2..01cfae1e20c 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -104,17 +104,30 @@ REGISTRY, ALTERNATIVE1, ALTERNATIVE2, and etc."
 
 
 (defcustom font-weight-table
-  '((thin . 0)
-    (ultralight . 40) (ultra-light . 40) (extra-light . 40)
-    (light . 50)
-    (semilight . 65) (semi-light . 65)
-    (book . 75)
-    (medium . 100) (regular . 100) (normal . 100)
-    (semibold . 180) (semi-bold . 180) (demibold . 180) (demi . 180)
-    (bold . 200)
-    (extrabold . 205) (extra-bold . 205)
-    (ultrabold . 205) (ultra-bold . 205)
-    (black . 210) (heavy . 210))
+  (if (eq system-type 'windows-nt)
+      '((thin . 100)
+        (ultralight . 200) (ultra-light . 200) (extra-light . 200)
+        (light . 300)
+        (semilight . 330) (semi-light . 330)
+        (book . 350)
+        (normal . 400) (regular . 400)
+        (medium . 500) 
+        (semibold . 600) (semi-bold . 600) (demibold . 600) (demi . 600)
+        (bold . 700)
+        (extrabold . 800) (extra-bold . 800)
+        (ultrabold . 800) (ultra-bold . 800)
+        (black . 900) (heavy . 900))
+    '((thin . 0)
+      (ultralight . 40) (ultra-light . 40) (extra-light . 40)
+      (light . 50)
+      (semilight . 65) (semi-light . 65)
+      (book . 75)
+      (medium . 100) (regular . 100) (normal . 100)
+      (semibold . 180) (semi-bold . 180) (demibold . 180) (demi . 180)
+      (bold . 200)
+      (extrabold . 205) (extra-bold . 205)
+      (ultrabold . 205) (ultra-bold . 205)
+      (black . 210) (heavy . 210)))
   "*Alist of font weight symbols vs the corresponding numeric values."
   :tag "Font weight table"
   :version "23.1"