sdic 2.1.3 + sdic-inline + sdic-inline-pos-tip on Emacs 24.3.1 of Debian 7.2 wheezy

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

===
$ mkdir -p ~/app/sdic
$ cd ~/app/sdic
$ wget http://namazu.org/~tsuchiya/sdic/sdic-2.1.3.tar.gz
$ tar xzvf sdic-2.1.3.tar.gz
$ cd sdic-2.1.3
$ wget http://namazu.org/~tsuchiya/sdic/data/gene95.tar.gz
$ wget http://namazu.org/~tsuchiya/sdic/data/edict.gz
$ ./configure
$ sudo make install
$ sudo make install-info
$ sudo make dict
$ sudo make install-dict
===

#+BEGIN_SRC emacs-lisp :results silent
(install-elisp-from-emacswiki "sdic-inline.el")
(install-elisp-from-emacswiki "sdic-inline-pos-tip.el")
(package-install 'popup)
(package-install 'pos-tip)
#+END_SRC

#+BEGIN_SRC emacs-lisp :results silent :tangle ~/.emacs
;;; sdic-mode 用の設定
(setq load-path (cons "/usr/local/share/emacs/site-lisp" load-path))
(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)
;;; sdic-inline の設定
(require 'sdic-inline)
(sdic-inline-mode t) ; sdic-inline モードの起動
;; 辞書ファイルの設定
(setq sdic-inline-eiwa-dictionary "/usr/local/share/dict/gene.sdic")
(setq sdic-inline-waei-dictionary "/usr/local/share/dict/jedict.sdic")

;; 辞書ファイルのエンコーディングについては、`sdic-inline-dictionary-encoding' 変数に指定
;; デフォルトの値は、euc-jp

;; http://github.com/m2ym/auto-complete
(require 'popup)

;; キー割り当ての変更
;; C-cC-p を無効化
;; (define-key sdic-inline-map "\C-c\C-p" 'nil)
;; C-cC-d にあらためて sdic-inline-display-popup を割り当て
;; (define-key sdic-inline-map "\C-c\C-d" 'sdic-inline-display-popup)

;; (setq sdic-inline-not-search-style 'point) ; デフォルト値。ポイント位置が前回と同じである限り、再度辞書ではひか
;; (setq sdic-inline-not-search-style 'word) ; カーソル下の単語が前回辞書で引いた単語と同じである限り、再度辞書で
;; (setq sdic-inline-not-search-style 't) ; sdic-inline-delay に定められた秒数毎にポイント下の単語を辞書でひく

;; 単語の過去形や活用を除去したもので検索を自動的に行う
;; # 例えば、enabled という単語がポイント下にあったならば、enable で検索する。
;; (setq sdic-inline-search-func 'sdic-inline-search-word-with-stem)

;;; pos-tip で表示する
(require 'sdic-inline-pos-tip)
(setq sdic-inline-search-func 'sdic-inline-search-word-with-stem)
(setq sdic-inline-display-func 'sdic-inline-pos-tip-show)
(define-key sdic-inline-map "\C-c\C-p" 'sdic-inline-pos-tip-show)
;; リージョン指定した時のみ
;; (defun sdic-inline-pos-tip-show-when-region-selected (entry)
;; (cond
;; ((and transient-mark-mode mark-active)
;; (funcall 'sdic-inline-pos-tip-show entry))
;; (t
;; (funcall 'sdic-inline-display-minibuffer entry))))
;;
;; (setq sdic-inline-search-func 'sdic-inline-search-word-with-stem)
;; (setq sdic-inline-display-func 'sdic-inline-pos-tip-show-when-region-selected)
;; (define-key sdic-inline-map "\C-c\C-p" 'sdic-inline-pos-tip-show)
#+END_SRC