Meadow3.10導入とメイリオ

マザーボードが壊れてガワ以外新品になったパソコンの
ＯＳについでなので Windows Vista を入れてみました。

メイリオフォントにすると目に優しい感じがして好きです。

これで仕事したいな…

エディタの Meadowも 3.x系に移行してみました。

フォントを全部メイリオにしてみたのですが
メイリオってプロポーショナルフォントなんですね
英文がちょっと見難いなと思ったのでウェブで漁って
Consolasを英文フォントに使用してみたところかなりいい感じ。

;;メイリオ-consolas
(w32-add-font  "meiryo-consolas" nil)
(w32-change-font
 "meiryo-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 "メイリオ" 0 18 400 0 nil nil nil 128 1 3 49)
     ((spacing . 1)))
    ((:char-spec japanese-jisx0208 :height any :slant italic)
     strict
     (w32-logfont "メイリオ" 0 18 400 0 t nil nil 128 1 3 49)
     ((spacing . 1)))
    ((:char-spec japanese-jisx0208 :height any :weight bold)
     strict
     (w32-logfont "メイリオ" 0 18 700 0 nil nil nil 128 1 3 49)
     ((spacing . 1)))
    ((:char-spec japanese-jisx0208 :height any :weight bold :slant italic)
     strict
     (w32-logfont "メイリオ" 0 18 700 0 t nil nil 128 1 3 49)
     ((spacing . -1)))
    )))