advised make-coding-system

[Katsumi Yamaoka]

少なくとも Mule 2.3 ＠ 19.34 で、CVS の先端にある APEL が使えなくなっ
ています。以下は pces-om.el の

(make-coding-system 'binary nil ?= "No conversion")

という部分が評価されたときに起こるエラーです。

Signaling: (wrong-type-argument listp "No conversion")
  plist-get("No conversion" mnemonic)
  (or (plist-get props (quote mnemonic)) "?")
  (string-to-char (or (plist-get props ...) "?"))
  (let ((mnemonic ...) (eol-type ...) properties tmp) (cond (... ...) (...
  transform-make-coding-system-args(binary nil 61 "No conversion")
  apply(transform-make-coding-system-args binary nil (61 "No conversion"))
  (let ((args ...)) (setq type (cadr args) ad-subr-args (cddr args)))
  (progn (let (...) (setq type ... ad-subr-args ...)))
  (if (symbolp type) (progn (let ... ...)))
  (when (symbolp type) (let (...) (setq type ... ad-subr-args ...)))
  (let (ad-return-value) (when (symbolp type) (let ... ...)) (setq ad-retu
  make-coding-system(binary nil 61 "No conversion")

半ば当てずっぽうですが、pccl.el で make-coding-system を advice
している部分は、次のようにするのが良いのではないでしょうか?
-------------- next part --------------
テキスト形式以外の添付ファイルを保管しました...
ファイル名: pccl.el.diff
型:         application/octet-stream
サイズ:     451 バイト
説明:       無し
URL:        <http://lists.chise.org/pipermail/apel-ja/attachments/20010601/bf764a5f/attachment-0001.obj>