Re: [bep] fontset on emacs21

[Mitsugu SAKAMOTO <mitsugu@argv.org>]

坂本です。
#元のお話。

From: Mitsugu SAKAMOTO <mitsugu@...>
Subject: [bep] fontset on emacs21
Date: Wed, 04 Jul 2001 16:59:45 +0900 (jst)

> これで日本語はMSゴシックになってるみたいです。

BDFフォントの設定もできたようです。(多分?)
まえできなかったのはintlfonts-1.2.tar.gzをとってきたら、それを.
/configure;make installしなければいけなかたようです。
##とりあえず、OSWでみて同じ数字のグラフィックシンボルが並んでいなかった
#ので、豆腐ではないことをなんとなく確認しました。
以下のように設定してみました。

;;; Fontset
(if (= emacs-major-version 21)
    (progn
      (setq w32-bdf-filename-alist
      (w32-find-bdf-fonts '("c:/emacs/fonts/bdf")
))

      (create-fontset-from-fontset-spec
       "-*-fixed-medium-r-normal-*-16-*-*-*-*-*-fontset-bdf,
latin-jisx0201:-sony-fixed-medium-r-normal--16-*-*-*-*-*-jisx0201.1976-0,
katakana-jisx0201:-sony-fixed-medium-r-normal--16-*-*-*-*-*-jisx0201.1976-0,
japanese-jisx0208-1978:-misc-fixed-medium-r-normal--16-*-*-*-*-*-jisc6226.1978-0,
japanese-jisx0208:-misc-fixed-medium-r-normal--16-*-*-*-*-*-jisx0208.1990-0"
 t t)

      (setq font-encoding-alist
	    (append '(("jisx0201"        (latin-jisx0201 . 0))
		      ("jisx0201"        (katakana-jisx0201 . 1))
		      ("JISX0208"        (japanese-jisx0208 . 0))
		      ("JISC6226.1978"   (japanese-jisx0208-1978 . 0))
		      ("JISX0213.2000-1" (japanese-jisx0213-1 . 0))
		      ("JISX0213.2000-2" (japanese-jisx0213-2 . 0))
		      ("BITMAP"        (bitmap . 0))
		      ) font-encoding-alist))

;;
      (setq initial-frame-alist 
	    '(
	      (font . "fontset-bdf") 
	      ))
      (setq w32-use-w32-font-dialog nil)))
--- Mitsugu