diff options
Diffstat (limited to 'src/wasp-audio.el')
| -rw-r--r-- | src/wasp-audio.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/wasp-audio.el b/src/wasp-audio.el index 56c85e70..59b8f07c 100644 --- a/src/wasp-audio.el +++ b/src/wasp-audio.el @@ -37,6 +37,7 @@ (defvar w/current-stream-transcribe-process nil) (defvar w/last-stream-transcription "") (defvar w/stream-keep-transcribing t) +(defvar w/stream-transcribe-voice-commands nil) (defun w/tts (msg) "Use TTS to say MSG." @@ -105,7 +106,10 @@ If VOLUME is specified, use it to adjust the volume (100 is default)." (lambda (_ _) (setq w/current-stream-transcribe-process nil) (with-current-buffer (get-buffer-create w/stream-transcribe-buffer) - (setq w/last-stream-transcription (buffer-string))) + (setq w/last-stream-transcription (buffer-string)) + (--each w/stream-transcribe-voice-commands + (when (s-contains? (car it) (s-downcase w/last-stream-transcription)) + (funcall (cdr it))))) (when w/stream-keep-transcribing (w/handle-stream-transcribe))))))) |