Mercurial > emacs
changeset 90896:ca52abcc479f
(font-weight-table): Use defaults on w32 that match
LOGFONT.lfWeight.
| author | Jason Rumney <jasonr@gnu.org> |
|---|---|
| date | Fri, 01 Jun 2007 09:43:24 +0000 |
| parents | 72729fde7610 |
| children | 543460ce007b |
| files | lisp/faces.el |
| diffstat | 1 files changed, 24 insertions(+), 11 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/faces.el Thu May 31 23:42:25 2007 +0000 +++ b/lisp/faces.el Fri Jun 01 09:43:24 2007 +0000 @@ -104,17 +104,30 @@ (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"