tvl-depot/users/tazjin/russian/helpers.el

8 lines
282 B
EmacsLisp
Raw Normal View History

;; 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)))))