MacBook Airを買って感心したのは辞書(スーパー大辞林/ウィズダム英和辞典/ウィズダム和英辞典)がデフォルトではいっていることだった。どうせネットで検索するからと今までは思っていたのだけれど、やはりローカルにあると気分がいい。
でもいちいち辞書を起動するのは面倒だな。
Emacsから検索できるようにだれか、つくっていないかなぁ、とググったりしたのだが、あまり情報がない。簡単すぎてだれもパッケージ化していないのかもしれない。
Googleサーチ呼び出しと同じ手で関数を作成した。
(defun y-dict (string)
"dict呼び出し"
(interactive "s")
(do-applescript
(concat
"open location \"dict:///"
(url-hexify-string string)
"\"")))