updated config for emacspeak.
This commit is contained in:
17
config.el
17
config.el
@@ -480,4 +480,21 @@ Funguje v libovolném textu, včetně Markdown linků (např. [x](./...))."
|
||||
(:prefix ("t" . "toggle")
|
||||
:desc "Speech ON" "s" #'my/emacspeak-on
|
||||
:desc "Speech OFF" "S" #'my/emacspeak-off))
|
||||
(setq dtk-speech-rate 300)
|
||||
|
||||
|
||||
;; emacspeak additional settings
|
||||
;;(setq emacspeak-speak-messages nil)
|
||||
;;(setq emacspeak-audio-indentation nil)
|
||||
(setq emacspeak-speak-echo nil)
|
||||
(setq emacspeak-character-echo nil)
|
||||
;;(setq emacspeak-word-echo nil)
|
||||
(setq emacspeak-line-echo t)
|
||||
;;(setq emacspeak-speak-messages nil)
|
||||
(global-set-key (kbd "C-c SPC") #'emacspeak-speak-buffer)
|
||||
(add-hook 'transient-post-exit-hook #'ignore)
|
||||
|
||||
(advice-add 'transient--show :after
|
||||
(lambda (&rest _)
|
||||
(dtk-speak (buffer-string))))
|
||||
|
||||
|
||||
Reference in New Issue
Block a user