fix: unable to translate in devdocs buffer

seagle0128 · Jul 18, 2024 · 4fadc50 · 4fadc50
1 parent c9a48f6
commit 4fadc50
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/lisp/init-dict.el b/lisp/init-dict.el
@@ -50,6 +50,7 @@
            ("C-c u"   . gt-do-text-utility)
            ("C-c d g" . gt-do-translate)
            ("C-c d G" . gt-do-translate-prompt)
+           ("C-c d p" . gt-do-speak)
            ("C-c d s" . gt-do-setup)
            ("C-c d u" . gt-do-text-utility))
     :init
@@ -69,7 +70,7 @@
       (setq gt-preset-translators
             `((default . ,(gt-translator
                            :taker   (list (gt-taker :pick nil :if 'selection)
-                                          (gt-taker :text 'paragraph :if '(Info-mode help-mode helpful-mode))
+                                          (gt-taker :text 'paragraph :if '(Info-mode help-mode helpful-mode devdocs-mode))
                                           (gt-taker :text 'buffer :pick 'fresh-word :if 'read-only)
                                           (gt-taker :text 'word))
                            :engines (if (display-graphic-p)