電子ブック／CDROM辞書を使おう編編 おもちゃ箱

mule-2.3(19.28)で bitmap 表示

apel をインストールする

apel-*.tar.gz を展開して、make しても mule-2.3では
Symbol's value as variable is void: \`\,
*** Error code 255
と言われてしまうので、mule-2.3で install.elを使うパッチ をあてて下さい。これで

make EMACS=mule PREFIX=/usr/local LISPDIR=/usr/local/lib/mule/site-lisp
make PREFIX=/usr/local LISPDIR=/usr/local/lib/mule/site-lisp install
を実行します。 ついでに mel も入れるなら、mel-*.tar.gz を展開し、
make EMACS=mule PREFIX=/usr/local LISPDIR=/usr/local/lib/mule/site-lisp FLAGS='-batch -q -l emu -l MEL-MK' とすれば、mule-2.3でも使えますが、最近は flim に移行し mel は obsolete になりつつあるようです。

bitmap.el をインストールする

bitmap-mule-7.18.tar.gz を展開したら、
patch -p < bitmap.patch
として bitmap.patch を当 てます。bitmap.el は今のところ 16ドットフォントしか使えないの で、14ドットを常用する場合は、bitmap-14dot.patchを当てて下さい。 その後

make EMACS=mule PREFIX=/usr/local LISPDIR=/usr/local/lib/mule/site-lisp FLAGS='-batch -q -l emu -l BITMAP-MK'
make install EMACS=mule PREFIX=/usr/local LISPDIR=/usr/local/lib/mule/site-lisp FLAGS='-batch -q -l emu -l BITMAP-MK'

とすれば、インストール終了です。 更に、

 # bdftopcf etl8x16-bitmap.bdf >etl8x16-bitmap.pcf
 # gzip -c etl8x16-bitmap.pcf >/usr/X11R6/lib/X11/fonts/misc/etl8x16-bitmap.pcf.gz
 # xset fp rehash

として、同梱のフォントをインストールします。

bitmap.el をロードする

~/.emacs に
(load-library "bitmap/bitmap")
の一行を入れておきます。 奥西さんの X-Face の作り方、表示のページ をみて、メールやニュースの X-Face の表示をさせてみましょう。

X-Face をみる

Mew で見るには、compface.tar.gz と mew-bitmap-mule.el を用意しなければなりません。
~/.emacs に以下を追加します。

[gnus5, vm, mh-e, cmailなど tm や semi を使った MUA の場合]

(add-hook 'mime-viewer/content-header-filter-hook 'x-face-mule:gnus-art-mime-highlight-headers t) ;;; tm (add-hook 'mime-view-content-header-filter-hook 'x-face-mule:gnus-art-mime-highlight-headers t) ;;; SEMI (require 'x-face-mule)

[バージョン1.90より古い Mew の場合]

(if window-system (progn (add-hook 'mew-summary-display-message-filter-hook ;; 1.90 'x-face-mule:x-face-decode-message-header) (add-hook 'mew-message-hook ;; 1.70 or older 'x-face-mule:x-face-decode-message-header) (require 'x-face-mule)))

[バージョン1.92以降の Mew の場合]

(if window-system (and (not (featurep 'xemacs))) (progn (if window-system (progn (setq mew-opt-highlight-x-face t) (setq mew-opt-highlight-x-face-function (function (lambda (beg end) (x-face-mule:x-face-decode-message-header beg end)))))) (require 'x-face-mule) ))

eblook + lookup で外字をみる

まず lookup と eblook をインストールします。

(すんません工事中でっす)