[Mew-dist 15708] mew がエラー停止する

[kiyoka at example.com]

kiyokaと申します。

私の環境で mew b91 - b93 を動かそうとすると 以下のエラーが起きます。
M-x mew とやった直後に現象が出ます。

(version)      "GNU Emacs 20.7.1 (i586-pc-linux-gnu, X toolkit) of Sat Dec 16 2000 on genkan"
emacs-version  "20.7.1"
mule-version   "4.0 (HANANOEN)"
apel           apel-10.2

とりあえず報告だけです。
ほかに同じ現象が出る方いらっしゃいますか？
+---
 Kiyoka Nishiyama <kiyoka at example.com>
 http://www.netfort.gr.jp/~kiyoka/


--- 以下バックトレース ---
Signaling: (invalid-function (macro lambda (dcsdb) (cons (quote let) (cons (list (list (quote dcsdb) dcsdb)) (quote ((car dcsdb)))))))
  mew-dcsdb-charset(("us-ascii"))
  mapcar(mew-dcsdb-charset (("us-ascii") ("iso-8859-1" . iso-8859-1) ("iso-8859-2" . iso-8859-2) ("iso-8859-3" . iso-8859-3) ("iso-8859-4" . iso-8859-4) ("iso-8859-5" . iso-8859-5) ("iso-8859-6" . iso-8859-6) ("iso-8859-7" . iso-8859-7) ("iso-8859-8" . iso-8859-8) ("iso-8859-9" . iso-8859-9) ("iso-2022-cn" . iso-2022-cn) ("iso-2022-cn-ext" . iso-2022-cn-ext) ("gb2312" . cn-gb-2312) ("cn-gb" . cn-gb-2312) ("hz-gb-2312" . hz-gb-2312) ("big5" . chinese-big5) ("cn-big5" . chinese-big5) ("iso-2022-kr" . iso-2022-kr) ("euc-kr" . euc-kr) ("iso-2022-jp" . iso-2022-jp) ("iso-2022-jp-2" . iso-2022-jp-2) ("iso-2022-jp-3" . iso-2022-jp-3) ("euc-jp" . euc-japan) ("shift_jis" . shift_jis) ("koi8-r" . koi8-r) ("tis-620" . tis620) ("iso-2022-int-1" . iso-2022-int-1) ("utf-7" . utf-7) ("utf-8" . utf-8)))
  (defvar mew-charset-list (mapcar (function mew-dcsdb-charset) mew-cs-database-for-decoding))
  eval-buffer(#<buffer  *load*<5>> nil "mew-mule")
  load-with-code-conversion("/usr/local/share/emacs/site-lisp/mew/mew-mule.el" "mew-mule" nil t)
  require(mew-mule)
  eval-buffer(#<buffer  *load*<4>> nil "mew-mule3")
  load-with-code-conversion("/usr/local/share/emacs/site-lisp/mew/mew-mule3.el" "mew-mule3" nil t)
  require(mew-mule3)
  (cond (mew-unibyte-p (setq mew-mule-ver 0) (require ...)) (t (setq mew-mule-ver 3) (require ...)))
  (cond ((null mew-mule-p) (setq mew-mule-ver 0) (require ...)) (t (cond ... ...)))
  (cond ((featurep ...) (setq mew-temacs-p nil) (setq mew-xemacs-p t) (if ... ...) (require ...) (require ...) (if ... ... ...)) (t (setq mew-temacs-p t) (setq mew-xemacs-p nil) (require ...) (if ... ... ... ...) (cond ... ...)))
  eval-buffer(#<buffer  *load*<3>> nil "mew-env")
  load-with-code-conversion("/usr/local/share/emacs/site-lisp/mew/mew-env.el" "mew-env" nil t)
  require(mew-env)
  eval-buffer(#<buffer  *load*<2>> nil "mew-vars")
  load-with-code-conversion("/usr/local/share/emacs/site-lisp/mew/mew-vars.el" "mew-vars" nil t)
  require(mew-vars)
  eval-buffer(#<buffer  *load*> nil "mew")
  load-with-code-conversion("/usr/local/share/emacs/site-lisp/mew/mew.el" "mew" nil nil)
  execute-extended-command(nil)
  call-interactively(execute-extended-command)