Просмотр исходного кода

Add sdcv dict for ilookup

pull/15/head
10sr 10 лет назад
Родитель
Сommit
0cd9251c88
1 измененных файлов: 4 добавлений и 0 удалений
  1. +4
    -0
      emacs.el

+ 4
- 0
emacs.el Просмотреть файл

@@ -1584,6 +1584,10 @@ IF OK-IF-ALREADY-EXISTS is true force download."
'(ilookup-open) '(ilookup-open)
(setq ilookup-dict-alist (setq ilookup-dict-alist
'( '(
("sdcv" . (lambda (word)
(shell-command-to-string
(format "sdcv -n '%s'"
word))))
("en" . (lambda (word) ("en" . (lambda (word)
(shell-command-to-string (shell-command-to-string
(format "sdcv -n -u dictd_www.dict.org_gcide '%s'" (format "sdcv -n -u dictd_www.dict.org_gcide '%s'"


Загрузка…
Отмена
Сохранить