A dictionary tool which can switch commandline-dictionary-app and sdic.

init.el

;; http://www.namazu.org/~tsuchiya/sdic/index.html
(require 'sdic)

;; hg clone http://hg.pqrs.org/commandline-dictionary-app
(defvar dict-bin "/Users/masutaka/repository/commandline-dictionary-app/src/dict"
  "a path of commandline-dictionary-app")

(defun dictionary-app (word)
  "Display the meaning of word using Dictionary.app."
  (interactive (list (sdic-read-from-minibuffer)))
  (set-buffer (get-buffer-create sdic-buffer-name))
  (or (string= mode-name sdic-mode-name) (sdic-mode))
  (setq buffer-read-only nil)
  (erase-buffer)
  (insert (format "============================================================\n%s\n" word))
  (call-process dict-bin
                nil sdic-buffer-name t word
                "Japanese-English" "Japanese" "Japanese Synonyms")
  (setq buffer-read-only t)
  (set-buffer-modified-p nil)
  (sdic-display-buffer 0))

(defun my-dictionary (arg)
  (interactive "P")
  (if arg
      (sdic-describe-word (sdic-read-from-minibuffer))
    (dictionary-app (sdic-read-from-minibuffer))))

The detail is the following.
http://masutaka.net/chalow/2011-05-18-1.html