emacsの日本語フォントがビットマップフォントになっている

[tsutsui]

58 で ~/.emacs のフォント設定周りの警告を修正したが、

いまさらながら 20241013版で日本語変換のテストをしてみたところ フォントが k14 と思われるビットマップフォントになっていた。

Emacsを普段遣いしていないので微妙に調べる気合が入らないが、 とりあえず以下を最低限の要件として修正してみる。

• 日本語としてVLゴシックを使用する
• ASCIIフォントは縦横比2:1でVLゴシックの1/2幅のフォントを使うようにする
• Emacs起動時のバナー画面が不自然にならない
• 絵文字などUnicodeにしかない文字は必要性を感じたところで別途考える

[tsutsui]

emacsの設定についてはググっても秘伝のタレというか記述の説明なく結果しかないものが多いが、 ChatGPTに聞いたりしながら「読めばなんとなく何をしようとしているかわかる」程度に想像がつく記載をしてみた。

; font settings
(cond (window-system
  (set-face-attribute 'default nil :height 110)
  (set-face-attribute 'fixed-pitch nil :family "VL Gothic")
  (set-face-attribute 'variable-pitch nil :family "VL PGothic")
  (set-fontset-font nil
    'japanese-jisx0208
    (cons "VL Gothic" "unicode-bmp"))
  (set-fontset-font nil
    'unicode
    (cons "VL Gothic" "unicode-bmp"))))

• :height の数字は従来の "Luxi Mono-10" のような数字指定の ✕10 でよいらしい（10.5ポイントとかあるから?）が、 10ポイントだとちょっと小さい気がしたので 11ポイントに変更した
• 等幅とプロポーショナルも set-face-attribute で指定できるっぽいのでそうした
  • 等幅をデフォルトにすると起動時の表示がおかしくなることがあるような……（ちゃんと見ていない）
• japanese-jisx0208 だと半角カナとかが入らないと思われるが、デフォルトも VLゴシックにしているのでたぶん出る?
• VLゴシックに含まれない Unicode絵文字などは出ないと思われるが、後で考える

この設定だと表示はこんな感じ

……が、よく見るとASCIIと日本語の幅が1:2になっていない？ もう少し調べてみる。

[tsutsui]

VLゴシックをデフォルトにする差分最小の設定は以下でもいけるっぽい。

--- .emacs.orig 2024-10-16 01:22:09.991092959 +0900
+++ .emacs  2024-10-16 01:22:31.214228262 +0900
@@ -7,7 +7,7 @@
 ; font settings
 (cond (window-system
   (add-to-list 'default-frame-alist
-               '(font . "Luxi Mono-10"))
+               '(font . "VL Gothic-11"))
   (set-fontset-font (frame-parameter nil 'font)
      'unicode
      '("VL Gothic" . "unicode-bmp"))))

が、ググってもこんな設定を書いている人は出てこない感じで、 ASCIIと日本語の幅が1:2にならないのも同じ。

とりあえず今どきっぽくちょっと修正した以下をとりあえず入れてみて、 細かいところは別でまた考える。

(set-language-environment "Japanese")

; mozc settings
(require 'mozc)
(setq default-input-method "japanese-mozc")

; font settings
(cond (window-system
  (set-face-attribute 'default nil :height 110)
  (set-face-attribute 'fixed-pitch nil :family "VL Gothic")
  (set-face-attribute 'variable-pitch nil :family "VL PGothic")
  (set-fontset-font (frame-parameter nil 'font)
    'katakana-jisx0201
    (cons "VL Gothic" "iso10646-1"))
  (set-fontset-font (frame-parameter nil 'font)
    'japanese-jisx0208
    (cons "VL Gothic" "iso10646-1"))
  (set-fontset-font (frame-parameter nil 'font)
    'japanese-jisx0212
    (cons "VL Gothic" "iso10646-1"))
  (set-fontset-font (frame-parameter nil 'font)
    'japanese-jisx0213-2
    (cons "VL Gothic" "iso10646-1"))
  (set-fontset-font (frame-parameter nil 'font)
    'japanese-jisx0213.2004-1
    (cons "VL Gothic" "iso10646-1"))
  (set-fontset-font (frame-parameter nil 'font)
    'unicode
    (cons "VL Gothic" "iso10646-1"))
))