35 lines
852 B
EmacsLisp
35 lines
852 B
EmacsLisp
;; -*- coding: utf-8; lexical-binding: t; -*-
|
|
|
|
(require 'lazy-load)
|
|
|
|
|
|
(lazy-load-local-keys
|
|
'(("s" . sdcv-search-pointer))
|
|
creature/map "sdcv")
|
|
|
|
(with-eval-after-load 'sdcv
|
|
(setq sdcv-dictionary-data-dir (file-truename "~/.stardict/dic/"))
|
|
(setq sdcv-dictionary-simple-list
|
|
'("牛津英汉双解美化版"
|
|
"朗道英汉字典5.0"
|
|
"朗道汉英字典5.0"))
|
|
(setq sdcv-dictionary-complete-list
|
|
'("牛津英汉双解美化版"
|
|
"朗道英汉字典5.0"
|
|
"朗道汉英字典5.0")))
|
|
|
|
|
|
(require 'yasnippet)
|
|
(require 'yasnippet-snippets)
|
|
|
|
(defun fix-lisp-comment-snippets ()
|
|
"Fix strange behavior about comment snippets in lisp."
|
|
(setq-local comment-start ";;"))
|
|
|
|
(add-hook 'emacs-lisp-mode-hook #'fix-lisp-comment-snippets)
|
|
|
|
(add-hook 'prog-mode-hook #'yas-minor-mode)
|
|
|
|
|
|
(provide 'init-tools)
|