about summary refs log tree commit diff
diff options
context:
space:
mode:
authorVincent Ambo <tazjin@tvl.su>2023-09-27T10·53+0300
committerclbot <clbot@tvl.fyi>2023-09-27T10·57+0000
commitde958ccf0172dfe43c3adcec624c03b1de70f8b3 (patch)
tree0666b8aa97cea588853ece4b98287c4cd283449a
parent6a834fd109e8fff8b52c52447c60eade8c73b5da (diff)
feat(tazjin/emacs): add a key binding for telega-chat-with r/6666
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>
-rw-r--r--users/tazjin/emacs/config/init.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/users/tazjin/emacs/config/init.el b/users/tazjin/emacs/config/init.el
index e98ae6dcd3..f3a6c55581 100644
--- a/users/tazjin/emacs/config/init.el
+++ b/users/tazjin/emacs/config/init.el
@@ -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