;; 標準の日本語フォントを変更。
;; 但し、特定の記号は半角のままだったはず。
(set-fontset-font nil 'han "VL Gothic")

;; bold のフォントを変更する。
;; 日本語フォントだけじゃなく欧米フォントも変更する。
(let ((font (create-fontset-from-ascii-font "Monospace-12:bold")))
(set-fontset-font font 'han "VL Gothic-24:bold")
(set-face-font 'bold font))