Various
- firewall rule for VNC for `pc` host - `go-translate` emacs package with custom bindings - `magit-delta` to improve diffs readability with `magit` through `delta` - `fira-code-mode` enabled only in `prog-mode` - `mpv` is spawned by `qutebrowser` without waiting for video being loaded
This commit is contained in:
parent
99cd09401a
commit
6791cb51a2
12 changed files with 64 additions and 10 deletions
34
users/profiles/emacs/emacs.d/config/config-translate.el
Normal file
34
users/profiles/emacs/emacs.d/config/config-translate.el
Normal file
|
@ -0,0 +1,34 @@
|
|||
(use-package go-translate
|
||||
:config
|
||||
(defclass gts-insert-render (gts-render) ())
|
||||
|
||||
(cl-defmethod gts-out ((_ gts-insert-render) task)
|
||||
(deactivate-mark)
|
||||
(insert (oref task result)))
|
||||
|
||||
(setq gts-translate-list '(("it" "en")))
|
||||
(setq gts-default-translator
|
||||
(gts-translator
|
||||
:picker
|
||||
(gts-prompt-picker)
|
||||
:engines
|
||||
(gts-google-engine :parser (gts-google-summary-parser))
|
||||
:render
|
||||
(gts-insert-render)
|
||||
))
|
||||
(defun gts-pop-definition ()
|
||||
(interactive)
|
||||
(gts-translate (gts-translator
|
||||
:picker
|
||||
(gts-noprompt-picker :texter (gts-current-or-selection-texter) :single t)
|
||||
:engines
|
||||
(gts-google-engine)
|
||||
:render
|
||||
(gts-posframe-pop-render)
|
||||
)))
|
||||
|
||||
:bind
|
||||
(("C-c t t" . gts-do-translate)
|
||||
("C-c t p" . gts-pop-definition)))
|
||||
|
||||
(provide 'config-translate)
|
Loading…
Add table
Add a link
Reference in a new issue