cage
/
tinmop
mirror of https://codeberg.org/cage/tinmop/
1
0
Fork 0
Code Issues

- [TUI] added 'C-g' keybinding to close the windows.

This commit is contained in:
cage 2024-03-02 15:38:53 +01:00
parent 3f888888aa
commit 1f02511525
1 changed files with 18 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
etc/init.lisp
View File

@ -251,6 +251,8 @@
(define-key "q" #'cancel-send-message *send-message-keymap*)
(define-key "C-g" #'cancel-send-message *send-message-keymap*)
(define-key "s" #'change-subject *send-message-keymap*)
(define-key "l" #'change-language *send-message-keymap*)
@ -525,6 +527,8 @@
(define-key "q" #'gemini-toc-close *gemini-toc-keymap*)
(define-key "C-g" #'gemini-toc-close *gemini-toc-keymap*)
(define-key "up" #'gemini-toc-scroll-up *gemini-toc-keymap*)
;; gemini stream window keymap
@ -557,6 +561,8 @@
(define-key "q" #'gemini-close-certificate-window *gemini-certificates-keymap*)
(define-key "C-g" #'gemini-close-certificate-window *gemini-certificates-keymap*)
(define-key "up" #'gemini-certificate-window-go-up *gemini-certificates-keymap*)
(define-key "c" #'gemini-change-certificate-password *gemini-certificates-keymap*)
@ -579,6 +585,8 @@
(define-key "q" #'close-gemlog-window *gemlog-subscription-keymap*)
(define-key "C-g" #'close-gemlog-window *gemlog-subscription-keymap*)
(define-key "up" #'gemlogs-subscription-go-up *gemlog-subscription-keymap*)
;; gempub library window keymap
@ -593,6 +601,8 @@
(define-key "q" #'gempub-library-window-close *gempub-library-keymap*)
(define-key "C-g" #'gempub-library-window-close *gempub-library-keymap*)
(define-key "up" #'gempub-library-window-go-up *gempub-library-keymap*)
;; tags keymap
@ -659,6 +669,8 @@
(define-key "q" #'close-open-attach-window *open-attach-keymap*)
(define-key "C-g" #'close-open-attach-window *open-attach-keymap*)
(define-key "up" #'open-message-attach-go-up *open-attach-keymap*)
;; message links keymap
@ -693,6 +705,8 @@
(define-key "q" #'close-open-message-link-window *open-message-link-keymap*)
(define-key "C-g" #'close-open-message-link-window *open-message-link-keymap*)
(define-key "t" #'tour-mode-link *open-message-link-keymap*)
(define-key "up" #'open-message-link-go-up *open-message-link-keymap*)
@ -715,6 +729,8 @@
(define-key "q" #'close-chats-list-window *chats-list-keymap*)
(define-key "C-g" #'close-chats-list-window *chats-list-keymap*)
(define-key "r" #'refresh-chat-messages *chats-list-keymap*)
(define-key "up" #'chat-list-go-up *chats-list-keymap*))
@ -789,6 +805,8 @@
(define-key "q" #'file-explorer-close-window *filesystem-explorer-keymap*)
(define-key "C-g" #'file-explorer-close-window *filesystem-explorer-keymap*)
(define-key "r" #'file-explorer-rename-path *filesystem-explorer-keymap*)
(define-key "u" #'file-explorer-upload-path *filesystem-explorer-keymap*)