;;;;MSGothic-Consolas
(w32-add-font "MSG-Consolas"
'((spec
((:char-spec ascii :height any)
strict
(w32-logfont "Consolas" 0 -14 400 0 nil nil nil 0 1 3 0))
((:char-spec ascii :height any :weight bold)
strict
(w32-logfont "Consolas" 0 -14 700 0 nil nil nil 0 1 3 0))
((:char-spec ascii :height any :slant italic)
strict
(w32-logfont "Consolas" 0 -14 400 0 t nil nil 0 1 3 0))
((:char-spec ascii :height any :weight bold :slant italic)
strict
(w32-logfont "Consolas" 0 -14 700 0 t nil nil 0 1 3 0))
((:char-spec japanese-jisx0208 :height any)
strict
(w32-logfont "MS ゴシック" 0 -14 400 0 nil nil nil 128 1 3 49)
((spacing . 1)))
((:char-spec japanese-jisx0208 :height any :slant italic)
strict
(w32-logfont "MS ゴシック" 0 -14 400 0 t nil nil 128 1 3 49)
((spacing . 1)))
((:char-spec japanese-jisx0208 :height any :weight bold)
strict
(w32-logfont "MS ゴシック" 0 -14 700 0 nil nil nil 128 1 3 49)
((spacing . 1)))
((:char-spec japanese-jisx0208 :height any :weight bold :slant italic)
strict
(w32-logfont "MS ゴシック" 0 -14 700 0 t nil nil 128 1 3 49)
((spacing . 1))))))
(set-face-attribute 'variable-pitch nil :font "MSG-Consolas")
としておいた。なんで、w32-add-fontしてから、w32-change-fontしてんだろ?多分どっかのコピペなんだろーけど。
Meiryo-Consolas @ Meadowとかからかねぇ?
あーぁ、Vista欲しいな、Macくれないんなら、Vistaくれ。
目が疲れる。。。