さっそく修正
Plusにありがたいお言葉をいただいたので,
さっそく修正したので,記録として残すっす。
;; MeiryoKeConConsolas 13 point (unless (member "MeiryoKeConConsolas-13" (w32-font-list)) (w32-add-font "MeiryoKeConConsolas-13" '((spec ((:char-spec ascii :height any) strict (w32-logfont "MeiryoKeConConsolas" 0 -13 400 0 nil nil nil 128 1 3 49)) ((:char-spec ascii :height any :weight bold) strict (w32-logfont "MeiryoKeConConsolas" 0 -13 600 0 nil nil nil 128 1 3 49)) ((:char-spec ascii :height any :slant italic) strict (w32-logfont "MeiryoKeConConsolas" 0 -13 400 0 nil nil nil 128 1 3 49)) ((:char-spec ascii :height any :weight bold :slant italic) strict (w32-logfont "MeiryoKeConConsolas" 0 -13 600 0 nil nil nil 128 1 3 49)) ((:char-spec katakana-jisx0201 :height any) strict (w32-logfont "MeiryoKeConConsolas" 0 -13 400 0 nil nil nil 128 1 3 49)) ((:char-spec katakana-jisx0201 :height any :weight bold) strict (w32-logfont "MeiryoKeConConsolas" 0 -13 400 0 nil nil nil 128 1 3 49)) ((:char-spec katakana-jisx0201 :height any :slant italic) strict (w32-logfont "MeiryoKeConConsolas" 0 -13 400 0 t nil nil 128 1 3 49)) ((:char-spec katakana-jisx0201 :height any :weight bold :slant italic) strict (w32-logfont "MeiryoKeConConsolas" 0 -13 600 0 t nil nil 128 1 3 49)) ((:char-spec japanese-jisx0208 :height any) strict (w32-logfont "MeiryoKeConConsolas" 0 -13 400 0 nil nil nil 128 1 3 49)) ((:char-spec japanese-jisx0208 :height any :weight bold) strict (w32-logfont "MeiryoKeConConsolas" 0 -13 600 0 nil nil nil 128 1 3 49)) ((:char-spec japanese-jisx0208 :height any :slant italic) strict (w32-logfont "MeiryoKeConConsolas" 0 -13 400 0 t nil nil 128 1 3 49)) ((:char-spec japanese-jisx0208 :height any :weight bold :slant italic) strict (w32-logfont "MeiryoKeConConsolas" 0 -13 600 0 t nil nil 128 1 3 49))))))
基本イタリックは使わないのだが,この合成フォントだと,
Consolasの部分は,斜体にならんな。
フォントの修正が必要なんかな。。。
また,Fontforgeと戯れる日々が待っているのだろうか・・・。