🚀 go-pugleaf

中村と申します。

フリーの辞書(edict)をEmacsから使用するedict.elのことで
助けて頂きたいことがあります。

今まで、GNU Emacs 18.55.4では、以下の内容を"$home/.emacs"に追加して
edictを問題なく使用しておりました。

最近、Mule-2.3に移行し、以下の内容をそのまま使っているのですが、
"m-*"や"m-&"と入力してもedictが起動しません。

mule-2.3では、以下のEmacs-Lispに修正が必要なのでしょうか？
どなたかアドバイスをお願い致します。

;;; Start of EDICT's automatically-added stuff.

;;; これは、edict の標準のキーバインディングを込み立てます。
;;; その機能が ~/lisp からautoload 自動ロードするのを込み立てます。
;;; 
;;; このコードは $HOME/.emacs に置いて下さい。
;;; キーバインディングを変更すると、global-set-key の形を編集して下さい。
;;; 以下、デファールトキーバインディングがあります。
;;; (「m-」と 「ESC-」は同じです。)
;;;   m-*	edict-search-english	英語の言葉を探せ
;;;   m-&	edict-search-kanji	日本語の言葉を探せ
;;;   m-+	edict-insert		一昨一致を挿入しろ

(cond ((fboundp 'convert-region-kanji-code)
       (autoload 'edict-search-english "~/lisp/edict"
		 "Search for a translation of an English word")
       (global-set-key "\e*" 'edict-search-english)

       (autoload 'edict-search-kanji "~/lisp/edict"
		 "Search for a translation of a Kanji sequence")
       (global-set-key "\e&" 'edict-search-kanji)

       (autoload 'edict-add-english "~/lisp/edict"
		 "Add a translation of an English word")

       (autoload 'edict-add-kanji "~/lisp/edict"
		 "Add a translation of a Kanji sequence")

       (autoload 'edict-insert "~/lisp/edict"
		 "Insert the last item looked up in edict.")

       (global-set-key "\e+" 'edict-insert)

       (autoload 'edict-insert-english "~/lisp/edict"
		 "Insert the last item looked up in edict.")
       (autoload 'edict-insert-日本語 "~/lisp/edict"
		 "Insert the last item looked up in edict.")

       (setq *edict-files* '("~/lisp/edict"))))

;;; End of EDICT's automatically-added stuff.