>>103
ありがとうございます

(set-default-font "IPAGothic\-BS-10:spacing=0") ; .emacs
(setq navi2ch-mona-ipa-mona-font-family-name "IPA モナー Pゴシック") ; init.el
と設定して、

(mapcar (lambda (h)
(let ((face (intern (format "navi2ch-mona%d-face" h))))
(face-font face)))
'(12 14 16))
("-unknown-IPA モナー Pゴシック-normal-normal-normal-*-12-*-*-*-*-0-iso10646-1"
"-unknown-IPA モナー Pゴシック-normal-normal-normal-*-14-*-*-*-*-0-iso10646-1"
"-unknown-IPA モナー Pゴシック-normal-normal-normal-*-16-*-*-*-*-0-iso10646-1")

こうなりました。(改行していますが実際は1行です)

navi2ch-mona-identは、
"$Id: navi2ch-mona.el,v 1.43 2009/09/25 16:25:30 nawota Exp $"
です。