emacs24中stardict 的使用（查英语单词）

本文主要是介绍emacs24中stardict 的使用（查英语单词），希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！

环境

系统：Linux luogw-pc 3.5.0-48-generic #72~precise1-Ubuntu SMP Tue Mar 11 20:09:08 UTC 2014 x86_64 x86_64 x86_64 GNU/Linux

emacs：GNU Emacs 24.3.1

步骤

１）安装星际译王:

sudo apt-get install stardict
２）安装星际译王命令行工具:

sudo apt-get install sdcv
３）安装词典：中英和英中，当然你可以装的更多。　

http://abloz.com/huzheng/stardict-dic/zh_CN/

词典安装目录：
安装的方法（以安装 stardict-oxford-gb-2.4.2.tar.bz2 为例）
先下好安装的词典软件包， stardict-oxford-gb-2.4.2.tar.bz2
在它的目录下面解压： tar -xjvf stardict-oxford-gb-2.4.2.tar.bz2
再把解压后的文件夹放入到/usr/share/stardict/dic中：
mv stardict-oxford-gb-2.4.2/usr/share/stardict/dic

注意：放置词典在自己的home目录下的.startdict/dic/ 会更合适应些，没有dic目录新建一个吧

４）在.emacs中添加如下lisp

(global-set-key (kbd "C-c d") 'kid-sdcv-to-buffer)
(defun kid-sdcv-to-buffer ()(interactive)(let ((word (if mark-active(buffer-substring-no-properties (region-beginning) (region-end))(current-word nil t))))(setq word (read-string (format "Search the dictionary for (default %s): " word)nil nil word))(set-buffer (get-buffer-create "*sdcv*"))(buffer-disable-undo)(erase-buffer)(let ((process (start-process-shell-command "sdcv" "*sdcv*" "sdcv" "-n" word)))(set-process-sentinelprocess(lambda (process signal)(when (memq (process-status process) '(exit signal))(unless (string= (buffer-name) "*sdcv*")(setq kid-sdcv-window-configuration (current-window-configuration))(switch-to-buffer-other-window "*sdcv*")(local-set-key (kbd "d") 'kid-sdcv-to-buffer)(local-set-key (kbd "q") (lambda ()(interactive)(bury-buffer)(unless (null (cdr (window-list))) ; only one window(delete-window)))))(goto-char (point-min))))))))

５）enjoy it