Sfoglia il codice sorgente

update ilookup-alist

pull/1/head
10sr 10 anni fa
parent
commit
897a14542b
1 ha cambiato i file con 13 aggiunte e 1 eliminazioni
  1. +13
    -1
      emacs.el

+ 13
- 1
emacs.el Vedi File

@@ -2419,9 +2419,21 @@ result for that word.")
(format "sdcv -n -u dictd_www.dict.org_gcide '%s'"
word))))
("ja" . (lambda (word)
(shell-command-to-string
(shell-command-to-string
(format "sdcv -n -u EJ-GENE95 '%s'"
word))))
("jaj" . (lambda (word)
(shell-command-to-string
(format "sdcv -n -u jmdict-en-ja '%s'"
word))))
("jag" . (lambda (word)
(with-temp-buffer
(insert (shell-command-to-string
(format "sdcv -n -u 'Genius English-Japanese' '%s'"
word)))
(html2text)
(buffer-substring (point-min)
(point-max)))))
("alc" . (lambda (word)
(shell-command-to-string
(format "alc '%s' | head -n 20"


Caricamento…
Annulla
Salva