sdic-inline-modeがうまく動いてなかった

emacs

まずダメだったが、辞書ファイルのPATHを相対PATHで書いてたこと。

(setq sdic-inline-eiwa-dictionary "~/.emacs.d/dict/gene.sdic")
(setq sdic-inline-waei-dictionary "~/.emacs.d/dict/jedict.sdic")

だと動いてなかったけど、

(setq sdic-inline-eiwa-dictionary "/Users/kshimo69/.emacs.d/dict/gene.sdic")
(setq sdic-inline-waei-dictionary "/Users/kshimo69/.emacs.d/dict/jedict.sdic")

だと動いた。
僕の設定ファイルはMacとLinuxで共有するので次のように書いておいた。

(setq sdic-inline-eiwa-dictionary
      (expand-file-name "~/.emacs.d/dict/gene.sdic"))
(setq sdic-inline-waei-dictionary
      (expand-file-name "~/.emacs.d/dict/jedict.sdic"))


次にダメだったのが、いつ有効になるのかよくわからんかったところ。
調べてみると、

  • sdic-inline-enable-modes => (w3m-mode)
  • sdic-inline-enable-faces => nil
  • sdic-inline-enable-filename-regex => ".*\\.txt$"
  • sdic-inline-enable-func => nil

となっていて、modesとfacesは無視してるし、filename-regexがtxtだけになってるのがダメっぽい。
ということで、いつも有効になってほしかったのでこんな設定にした。

(setq sdic-inline-enable-filename-regex ".*$")

これででけた。


設定全体はこんな感じ。

;; -*- Mode: Emacs-Lisp ; Coding: utf-8 -*-

;; http://www.namazu.org/~tsuchiya/sdic/index.html
(autoload 'sdic-describe-word "sdic" "英単語の意味を調べる" t nil)
(global-set-key "\C-cW" 'sdic-describe-word)
(autoload 'sdic-describe-word-at-point
  "sdic" "カーソルの位置の英単語の意味を調べる" t nil)
(global-set-key "\C-cw" 'sdic-describe-word-at-point)

;; http://d.hatena.ne.jp/khiker/20100303/sdic_inline
(require 'sdic-inline)
;; sdic-inline モードの起動
(sdic-inline-mode t)
;; 辞書ファイルの設定
;; (setq sdic-inline-dictionary-encoding 'euc-jp)
(setq sdic-inline-eiwa-dictionary
      (expand-file-name "~/.emacs.d/dict/gene.sdic"))
(setq sdic-inline-waei-dictionary
      (expand-file-name "~/.emacs.d/dict/jedict.sdic"))
;; major-mode を基準にオン・オフを判断しなくする。
(setq sdic-inline-enable-modes nil)
;; ;; w3m-mode でも動作するようにする。
;; (add-to-list 'sdic-inline-enable-modes 'w3m-mode)
;; テキスプロパティを基準にオン・オフを判断しなくする。
(setq sdic-inline-enable-faces nil)
;; 空白の上にポイントがあったら検索しない
(setq sdic-inline-word-at-point-strict t)
;; ;; 過去形や活用を除去して検索するK
;; (setq sdic-inline-search-func 'sdic-inline-search-word-with-stem)
;; どんなファイル名でも有効にする
(setq sdic-inline-enable-filename-regex ".*$")
;; popupを有効に
(require 'popup)

;; http://www.emacswiki.org/emacs/sdic-inline-pos-tip.el
(require 'sdic-inline-pos-tip)
(setq sdic-inline-display-func 'sdic-inline-pos-tip-show)
(define-key sdic-inline-map "\C-c\C-p" 'sdic-inline-pos-tip-show)

(provide 'init-sdic)

追記
と書いたら作者の方がsdic-inline.elの中でexpand-file-nameするように対応してくださったので設定戻しました。

(setq sdic-inline-eiwa-dictionary "~/.emacs.d/dict/gene.sdic")
(setq sdic-inline-waei-dictionary "~/.emacs.d/dict/jedict.sdic")