diff options
author | jao <jao@gnu.org> | 2022-01-27 06:19:25 +0000 |
---|---|---|
committer | jao <jao@gnu.org> | 2022-01-27 06:19:25 +0000 |
commit | 3a9fe964dd70ae93dc6a55dd03a6ff053631598f (patch) | |
tree | f578dc674e6efbb29a2e6a111fb265a0cff6e27a | |
parent | 163cac59b54dfba115baf92b20d67f051e3772a7 (diff) | |
download | elibs-3a9fe964dd70ae93dc6a55dd03a6ff053631598f.tar.gz elibs-3a9fe964dd70ae93dc6a55dd03a6ff053631598f.tar.bz2 |
jao-say
-rw-r--r-- | completion.org | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/completion.org b/completion.org index a9fcb95..bd5f1b3 100644 --- a/completion.org +++ b/completion.org @@ -78,7 +78,7 @@ ("M-<backspace>" . vertico-directory-delete-word) ("<backspace>" . vertico-directory-delete-char)))) - ;; (vertico-mode) + (vertico-mode) #+end_src * mct @@ -102,7 +102,7 @@ jao-buffer-same-mode vc-retrieve-tag))) - (mct-minibuffer-mode 1) + ;; (mct-minibuffer-mode 1) ;; (mct-region-mode 1) #+end_src @@ -367,9 +367,15 @@ (require 'embark-consult))) #+end_src -*** dict +*** dict/say #+begin_src emacs-lisp + (defun jao-say (&optional word) + (interactive "sWhat? ") + (shell-command-to-string (format "say %s" word)) + "") + (define-key embark-identifier-map "D" #'dictionary-search) + (define-key embark-identifier-map "S" #'jao-say) #+end_src *** org targets #+begin_src emacs-lisp |