1
0
mirror of https://codeberg.org/cage/tinmop/ synced 2025-02-02 04:36:43 +01:00

- added 'k' and 'j' as alias for scrolling windows up and down.

This commit is contained in:
cage 2022-02-25 12:37:18 +01:00
parent 6a942b6110
commit 965f09b69e

View File

@ -205,6 +205,10 @@
(define-key "down" #'follow-request-go-down *follow-requests-keymap*)
(define-key "k" #'follow-request-go-up *follow-requests-keymap*)
(define-key "j" #'follow-request-go-down *follow-requests-keymap*)
(define-key "d" #'follow-request-delete *follow-requests-keymap*)
(define-key "C-J" #'process-follow-requests *follow-requests-keymap*)
@ -217,6 +221,10 @@
(define-key "down" #'attach-go-down *send-message-keymap*)
(define-key "k" #'attach-go-up *send-message-keymap*)
(define-key "j" #'attach-go-down *send-message-keymap*)
(define-key "d" #'attach-delete *send-message-keymap*)
(define-key "s" #'change-subject *send-message-keymap*)
@ -237,6 +245,10 @@
(define-key "down" #'thread-go-down *thread-keymap*)
(define-key "k" #'thread-go-up *thread-keymap*)
(define-key "j" #'thread-go-down *thread-keymap*)
(define-key "C-J" #'thread-open-selected-message *thread-keymap*)
(define-key "dc" #'thread-mark-delete-selected-message *thread-keymap*)
@ -347,6 +359,10 @@
(define-key "down" #'message-scroll-down *message-keymap*)
(define-key "k" #'message-scroll-up *message-keymap*)
(define-key "j" #'message-scroll-down *message-keymap*)
(define-key "left" #'message-scroll-left *message-keymap*)
(define-key "right" #'message-scroll-right *message-keymap*)
@ -373,6 +389,10 @@
(define-key "down" #'message-scroll-down *gemini-message-keymap*)
(define-key "k" #'message-scroll-up *gemini-message-keymap*)
(define-key "j" #'message-scroll-down *gemini-message-keymap*)
(define-key "left" #'message-scroll-left *gemini-message-keymap*)
(define-key "right" #'message-scroll-right *gemini-message-keymap*)
@ -433,6 +453,10 @@
(define-key "down" #'gemini-toc-scroll-down *gemini-toc-keymap*)
(define-key "k" #'gemini-toc-scroll-up *gemini-toc-keymap*)
(define-key "j" #'gemini-toc-scroll-down *gemini-toc-keymap*)
(define-key "q" #'gemini-toc-close *gemini-toc-keymap*)
(define-key "n" #'gemini-toc-scroll-down-page *gemini-toc-keymap*)
@ -457,6 +481,10 @@
(define-key "down" #'gemini-streams-window-down *gemini-downloads-keymap*)
(define-key "k" #'gemini-streams-window-up *gemini-downloads-keymap*)
(define-key "j" #'gemini-streams-window-down *gemini-downloads-keymap*)
(define-key "q" #'gemini-streams-window-close *gemini-downloads-keymap*)
(define-key "C-J" #'gemini-streams-window-open-stream *gemini-downloads-keymap*)
@ -467,6 +495,10 @@
(define-key "down" #'gemini-certificate-window-go-down *gemini-certificates-keymap*)
(define-key "k" #'gemini-certificate-window-go-up *gemini-certificates-keymap*)
(define-key "j" #'gemini-certificate-window-go-down *gemini-certificates-keymap*)
(define-key "q" #'gemini-close-certificate-window *gemini-certificates-keymap*)
(define-key "C-J" #'gemini-delete-certificate *gemini-certificates-keymap*)
@ -479,6 +511,10 @@
(define-key "down" #'gemlogs-subscription-go-down *gemlog-subscription-keymap*)
(define-key "k" #'gemlogs-subscription-go-up *gemlog-subscription-keymap*)
(define-key "j" #'gemlogs-subscription-go-down *gemlog-subscription-keymap*)
(define-key "q" #'close-gemlog-window *gemlog-subscription-keymap*)
(define-key "d" #'gemlog-cancel-subscription *gemlog-subscription-keymap*)
@ -491,6 +527,10 @@
(define-key "down" #'gempub-library-window-go-down *gempub-library-keymap*)
(define-key "k" #'gempub-library-window-go-up *gempub-library-keymap*)
(define-key "j" #'gempub-library-window-go-down *gempub-library-keymap*)
(define-key "q" #'gempub-library-window-close *gempub-library-keymap*)
(define-key "C-J" #'gempub-open-file *gempub-library-keymap*)
@ -501,6 +541,10 @@
(define-key "down" #'tag-go-down *tags-keymap*)
(define-key "k" #'tag-go-up *tags-keymap*)
(define-key "j" #'tag-go-down *tags-keymap*)
(define-key "C-J" #'open-tag-folder *tags-keymap*)
(define-key "U" #'unsubscribe-to-hash *tags-keymap*)
@ -517,6 +561,10 @@
(define-key "down" #'conversation-go-down *conversations-keymap*)
(define-key "k" #'conversation-go-up *conversations-keymap*)
(define-key "j" #'conversation-go-down *conversations-keymap*)
(define-key "dc" #'delete-conversation *conversations-keymap*)
(define-key "I" #'ignore-conversation *conversations-keymap*)
@ -531,6 +579,10 @@
(define-key "down" #'open-message-attach-go-down *open-attach-keymap*)
(define-key "k" #'open-message-attach-go-up *open-attach-keymap*)
(define-key "j" #'open-message-attach-go-down *open-attach-keymap*)
(define-key "q" #'close-open-attach-window *open-attach-keymap*)
;; message links keymap
@ -541,6 +593,10 @@
(define-key "down" #'open-message-link-go-down *open-message-link-keymap*)
(define-key "k" #'open-message-link-go-up *open-message-link-keymap*)
(define-key "j" #'open-message-link-go-down *open-message-link-keymap*)
(define-key "q" #'close-open-message-link-window *open-message-link-keymap*)
(define-key "e" #'open-message-link-open-enqueue *open-message-link-keymap*)
@ -575,6 +631,11 @@
(define-key "down" #'chat-list-go-down *chats-list-keymap*)
(define-key "k" #'chat-list-go-up *chats-list-keymap*)
(define-key "j" #'chat-list-go-down *chats-list-keymap*)
;; chat window
(defun write-to-chat ()
@ -586,6 +647,10 @@
(define-key "down" #'message-scroll-down *chat-message-keymap*)
(define-key "k" #'message-scroll-up *chat-message-keymap*)
(define-key "j" #'message-scroll-down *chat-message-keymap*)
(define-key "home" #'message-scroll-begin *chat-message-keymap*)
(define-key "end" #'message-scroll-end *chat-message-keymap*)
@ -628,6 +693,10 @@
(define-key "down" #'file-explorer-go-down *filesystem-explorer-keymap*)
(define-key "k" #'file-explorer-go-up *filesystem-explorer-keymap*)
(define-key "j" #'file-explorer-go-down *filesystem-explorer-keymap*)
(define-key "home" #'file-explorer-scroll-begin *filesystem-explorer-keymap*)
(define-key "end" #'file-explorer-scroll-end *filesystem-explorer-keymap*)