たった3行のelisp関数修正

前回lookupの関数のロードを手でやら無いといけないのを自動にするやり方がわからないと書きましたが、

やさしいEmacs‐Lisp講座

の第9講『パッケージ作成に必要なこと』にかいてありました。
P186のrequireを使います。修正したプログラム部分

(require 'lookup)

(defun my-sdic2lookup ()
　"sdicの英単語の上で f を押すとlookupでの検索を行う"
　(interactive)
　(lookup)
　(lookup-select-search-pattern(thing-at-point `word)))

をmy-dic.elに保存して、

(add-hook 'sdic-mode-hook
　　　　　(lambda ()
　　　　　　 (define-key sdic-mode-map "f" 'my-sdic2lookup)))
(autoload 'my-sdic2lookup "my-dic" "sdicの英単語の上で f を押すとlookupでの検索を行う" t)

とやるとうまく行きました。