From 3a9fe964dd70ae93dc6a55dd03a6ff053631598f Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Thu, 27 Jan 2022 06:19:25 +0000
Subject: jao-say

---
 completion.org | 12 +++++++++---
 1 file changed, 9 insertions(+), 3 deletions(-)

(limited to 'completion.org')

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
-- 
cgit v1.2.3