Meadow3-r4091でkeisen-muleが使えない

["YAMAMOTO.Taku" <yamataku39jp@xxxxxxxxx>]

こんにちは、山本と申します。
いつも有難くMeadow3を使わせていただいております。
ところでバグレポなんですが、

http://www.bookshelf.jp/elc/keisen-mule.lzh

にある keisen-muleをロードして、M-x keisen-muleすると、以下のエラーがdebug-on-error t
で出ます。これはMeadow3とkeisen-muleのどちらが問題なのでしょうか。
宜しくお願いいたします。

Debugger entered--Lisp error: (void-function sref)
  (sref keisen-table 0)
  (char-to-string (sref keisen-table 0))
  (length (char-to-string (sref keisen-table 0)))
  (defconst keisen-unit-length (length (char-to-string ...))
"\xdbd3\xe07e\xe0c7\xe552\xd24e\xd2d0\xd2a4\xd2c8\xdff4")
  eval-buffer(#<buffer  *load*<4>> nil
"c:/usr/local/lib/emacs/22/site-lisp/keisen-mule/keisen-mule.el" nil
t)  ; Reading at buffer position 10499
  load-with-code-conversion("c:/usr/local/lib/emacs/22/site-lisp/keisen-mule/keisen-mule.el"
"c:/usr/local/lib/emacs/22/site-lisp/keisen-mule/keisen-mule.el" nil
t)
  require(keisen-mule)
  eval-buffer(#<buffer  *load*<3>> nil
"c:/usr/local/lib/emacs/22/site-lisp/keisen-mule/keisen-mouse.el" nil
t)  ; Reading at buffer position 1143
  load-with-code-conversion("c:/usr/local/lib/emacs/22/site-lisp/keisen-mule/keisen-mouse.el"
"c:/usr/local/lib/emacs/22/site-lisp/keisen-mule/keisen-mouse.el" nil
nil)
  execute-extended-command(nil)
  call-interactively(execute-extended-command)
  recursive-edit()
  byte-code("ニ	@ヌ=・