diff options
author | Oscar Najera <hi@oscarnajera.com> | 2024-06-26 20:13:43 +0200 |
---|---|---|
committer | Oscar Najera <hi@oscarnajera.com> | 2024-06-26 20:13:43 +0200 |
commit | 3b1ace470bb3ec674256d7cd99c73f2a63e028b8 (patch) | |
tree | 89793d2e3914b0104d14c9ecb51bd518236c9eaa /config | |
parent | 603cef5764fde722a35c69a1d0a499b385147caa (diff) | |
download | dotfiles-3b1ace470bb3ec674256d7cd99c73f2a63e028b8.tar.gz dotfiles-3b1ace470bb3ec674256d7cd99c73f2a63e028b8.tar.bz2 dotfiles-3b1ace470bb3ec674256d7cd99c73f2a63e028b8.zip |
shavian transliterate
Diffstat (limited to 'config')
-rw-r--r-- | config/doom/config.org | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/config/doom/config.org b/config/doom/config.org index 577f1f9..63e6977 100644 --- a/config/doom/config.org +++ b/config/doom/config.org @@ -126,6 +126,24 @@ Shamelessly copied from https://tecosaur.github.io/emacs-config/#dictionary current-prefix-arg)) (lexic-search identifier nil nil t)) #+end_src +** Shavian transliterate +#+begin_src emacs-lisp +(defun on/shavian-transliterate (start end) + "Convert text from START to END to Shavian in new buffer." + (interactive "r") + (let ((buffer (get-buffer-create "*shavian translit*"))) + (with-current-buffer buffer + (erase-buffer)) + (call-process-region + start end + (expand-file-name ".virtualenvs/shavian/bin/python" "~/") + nil buffer nil + (expand-file-name "dev/readlex/latin2shaw.py" "~/")) + (with-current-buffer buffer + (text-mode) + (display-buffer buffer)))) + +#+end_src * Orgmode #+begin_src emacs-lisp (after! org |