mirror of
https://github.com/js0ny/dotfiles.git
synced 2025-12-21 00:33:00 +00:00
72 lines
3 KiB
EmacsLisp
72 lines
3 KiB
EmacsLisp
;; -*- lexical-binding: t; -*-
|
|
;; telegram client for emacs
|
|
(use-package! telega
|
|
:init
|
|
(setq telega-server-libs-prefix "/usr")
|
|
(setq telega-directory (expand-file-name "~/.local/share/telega"))
|
|
|
|
|
|
;; (prefix-key global-map (kbd "C-c t") telega-prefix-map)
|
|
(unless (display-graphic-p) (setq telega-use-images nil))
|
|
(when (modulep! :editor evil)
|
|
(cl-pushnew 'telega +evil-collection-disabled-list :test #'equal)
|
|
(setq evil-collection-mode-list (remove 'telega evil-collection-mode-list))
|
|
(set-evil-initial-state! '(telega-root-mode telega-chat-mode) 'emacs))
|
|
|
|
:hook
|
|
(telega-load . telega-mode-line-mode)
|
|
(telega-load . global-telega-url-shorten-mode)
|
|
(telega-load . global-telega-mnz-mode)
|
|
(telega-load . telega-autoplay-mode)
|
|
(telega-load . telega-transient-mode)
|
|
(telega-load . telega-adblock-mode)
|
|
(telega-chat-mode . (lambda ()
|
|
(setq-local visual-fill-column-extra-text-width
|
|
'(0 . 2))))
|
|
|
|
:config
|
|
(add-hook 'telega-msg-ignore-predicates
|
|
(telega-match-gen-predicate 'msg '(sender is-blocked)))
|
|
(setq telega-chat-show-deleted-messages-for '(me-is-owner OR-ADMIN)
|
|
;; telega-use-tracking-for '(or mention (and unread unmuted))
|
|
telega-open-file-function 'org-open-file
|
|
;; telega-open-message-as-file '(video video-note)
|
|
telega-translate-to-language-by-default "zh"
|
|
telega-avatar-workaround-gaps-for `(return t)
|
|
telega-mode-line-string-format (remove
|
|
'(:eval (telega-mode-line-icon))
|
|
telega-mode-line-string-format))
|
|
|
|
(map! (:prefix "C-c"
|
|
:desc "Telega all chats"
|
|
"c" #'telega-chat-with
|
|
:desc "Telega important chats"
|
|
"v" #'telega-switch-important-chat
|
|
:desc "Telega next important chat"
|
|
"SPC" (cmd! (let ((current-prefix-arg '(4)))
|
|
(call-interactively #'telega-switch-important-chat))))
|
|
(:map telega-chat-mode-map
|
|
(:prefix ("C-t" . "Telega chat topic")
|
|
:desc "Telega filter by chat topic"
|
|
"C-t" #'telega-chatbuf-filter-by-topic
|
|
:desc "Telega clear chat topic"
|
|
"C-c" #'telega-chatbuf-thread-cancel)))
|
|
|
|
; (load! "+telega-auto-input-method")
|
|
|
|
(set-popup-rule! (regexp-quote telega-root-buffer-name)
|
|
:slot 10 :vslot 10 :side 'right :size 90 :ttl nil :quit 'current :modeline t)
|
|
(set-popup-rule! "^◀[^◀\[]*[\[({<].+[\])}>]"
|
|
:slot 10 :vslot 10 :side 'right :size 90 :ttl 10 :quit 'current :modeline t)
|
|
(set-popup-rule! (regexp-quote "*Telega User*")
|
|
:slot 20 :vslot 10 :side 'right :height .5 :ttl 10 :quit t :modeline nil :select t)
|
|
(set-popup-rule! (regexp-quote "*Telegram Chat Info*")
|
|
:slot 20 :vslot 10 :side 'right :height .5 :ttl 10 :quit t :modeline nil :select t))
|
|
|
|
;; (load! "+telega-addition")
|
|
|
|
(use-package! telega-dired-dwim
|
|
:after telega dired)
|
|
|
|
(use-package! telega-bridge-bot
|
|
:after telega)
|