sqrtminusone/dotfiles
1
0
Fork 0
mirror of https://github.com/SqrtMinusOne/dotfiles.git synced 2025-12-10 19:23:03 +03:00
Code Issues Projects Releases Packages Wiki Activity Actions

feat(emacs): more keymaps for ement.el

Browse source
This commit is contained in:
Pavel Korytov 2023-05-21 23:50:51 +03:00
parent 4e0583c103
commit 9b0e73a470
2 changed files with 67 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

32
.emacs.d/init.el
View file

@ -6028,6 +6028,38 @@ base toot."
"gr" #'revert-buffer "gr" #'revert-buffer
"RET" #'ement-room-list-RET)) "RET" #'ement-room-list-RET))
(with-eval-after-load 'ement-room-mode
(general-define-key
:states '(normal visual)
:keymaps '(ement-room-mode-map)
"q" #'quit-window
"?" #'ement-room-transient
"C-u" #'ement-room-scroll-down-command
"C-d" #'ement-room-scroll-up-mark-read
"M-<RET>" #'ement-room-compose-message
"<RET>" #'ement-room-send-message
"S-<RET>" #'ement-room-write-reply
"K" #'ement-room-goto-prev
"J" #'ement-room-goto-next
"gr" #'ement-room-sync
"rT" #'ement-tag-room
"rd" #'ement-describe-room
"rm" #'ement-list-members
"rn" #'ement-room-set-notification-state
"rt" #'ement-room-set-topic
"se" #'ement-room-send-emote
"sf" #'ement-room-send-file
"sr" #'ement-room-send-reaction
"sd" #'ement-room-view-event
"uI" #'ement-ignore-user
"U <RET>" #'ement-send-direct-message
"ui" #'ement-invite-user)
(general-define-key
:states '(motion)
:keymaps '(ement-room-mode-map)
"C-u" #'ement-room-scroll-down-command
"C-d" #'ement-room-scroll-up-mark-read))
(use-package telega (use-package telega
:straight t :straight t
:if (not (or my/remote-server my/is-termux)) :if (not (or my/remote-server my/is-termux))

35
Emacs.org
View file

@ -8422,6 +8422,41 @@ Some custom keymaps:
"gr" #'revert-buffer "gr" #'revert-buffer
"RET" #'ement-room-list-RET)) "RET" #'ement-room-list-RET))
#+end_src #+end_src
Also a keymap for room mode:
#+begin_src emacs-lisp
(with-eval-after-load 'ement-room-mode
(general-define-key
:states '(normal visual)
:keymaps '(ement-room-mode-map)
"q" #'quit-window
"?" #'ement-room-transient
"C-u" #'ement-room-scroll-down-command
"C-d" #'ement-room-scroll-up-mark-read
"M-<RET>" #'ement-room-compose-message
"<RET>" #'ement-room-send-message
"S-<RET>" #'ement-room-write-reply
"K" #'ement-room-goto-prev
"J" #'ement-room-goto-next
"gr" #'ement-room-sync
"rT" #'ement-tag-room
"rd" #'ement-describe-room
"rm" #'ement-list-members
"rn" #'ement-room-set-notification-state
"rt" #'ement-room-set-topic
"se" #'ement-room-send-emote
"sf" #'ement-room-send-file
"sr" #'ement-room-send-reaction
"sd" #'ement-room-view-event
"uI" #'ement-ignore-user
"U <RET>" #'ement-send-direct-message
"ui" #'ement-invite-user)
(general-define-key
:states '(motion)
:keymaps '(ement-room-mode-map)
"C-u" #'ement-room-scroll-down-command
"C-d" #'ement-room-scroll-up-mark-read))
#+end_src
*** Telega *** Telega
[[https://github.com/zevlg/telega.el/][telega.el]] is a Telegam client for Emacs. [[https://github.com/zevlg/telega.el/][telega.el]] is a Telegam client for Emacs.