mdebray/tvl-depot
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

feat(tazjin/emacs): add a key binding for telega-chat-with

Browse source 
Puts this under the prefix command for #'telega itself.

Change-Id: I7dc394840ded3f31bf54848e581a0add36da7f3b
Reviewed-on: https://cl.tvl.fyi/c/depot/+/9479
Tested-by: BuildkiteCI
Reviewed-by: tazjin <tazjin@tvl.su>
Autosubmit: tazjin <tazjin@tvl.su>
This commit is contained in:
Vincent Ambo 2023-09-27 13:53:25 +03:00 committed by clbot
parent 6a834fd109
commit de958ccf01
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
users/tazjin/emacs/config/init.el
View file

@ -178,7 +178,9 @@
(setq common-lisp-hyperspec-root "file:///home/tazjin/docs/lisp/"))
(use-package telega
:bind (:map global-map ("s-t" . telega)
:bind (:map global-map ("s-t" . (lambda (p) (interactive "P")
(if p (call-interactively #'telega-chat-with)
(telega))))
:map telega-chat-button-map ("a" . ignore))
:config (telega-mode-line-mode 1)
:custom