8 lines
282 B
EmacsLisp
8 lines
282 B
EmacsLisp
|
;; Helper functions for creating the other files.
|
||
|
|
|
||
|
|
(defun wiktionary-lookup-at-point (ask-lang)
|
||
|
|
(interactive "P")
|
||
|
|
(let ((language (if ask-lang (read-string "Language code? ") "ru")))
|
||
|
|
(eww (concat "https://ru.wiktionary.org/wiki/"
|
||
|
|
(thing-at-point 'word)))))
|