[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/mastodon 2bfd9f097d 08/18: align mastodon keymap
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/mastodon 2bfd9f097d 08/18: align mastodon keymap |
Date: |
Mon, 2 Dec 2024 16:00:34 -0500 (EST) |
branch: elpa/mastodon
commit 2bfd9f097de92e200f6ae05042c819ab1f1ad454
Author: marty hiatt <martianhiatus@disroot.org>
Commit: marty hiatt <martianhiatus@disroot.org>
align mastodon keymap
---
lisp/mastodon.el | 138 +++++++++++++++++++++++++++----------------------------
1 file changed, 69 insertions(+), 69 deletions(-)
diff --git a/lisp/mastodon.el b/lisp/mastodon.el
index b1147dc9ce..5f7f722c6b 100644
--- a/lisp/mastodon.el
+++ b/lisp/mastodon.el
@@ -194,85 +194,85 @@ and X others...\"."
(defvar mastodon-mode-map
(let ((map (make-sparse-keymap)))
;; navigation inside a timeline
- (define-key map (kbd "n") #'mastodon-tl--goto-next-item)
- (define-key map (kbd "p") #'mastodon-tl--goto-prev-item)
- (define-key map (kbd "M-n") #'mastodon-tl--next-tab-item)
- (define-key map (kbd "M-p") #'mastodon-tl--previous-tab-item)
- (define-key map [?\t] #'mastodon-tl--next-tab-item)
- (define-key map [backtab] #'mastodon-tl--previous-tab-item)
- (define-key map [?\S-\t] #'mastodon-tl--previous-tab-item)
- (define-key map [?\M-\t] #'mastodon-tl--previous-tab-item)
- (define-key map (kbd "l") #'recenter-top-bottom)
+ (define-key map (kbd "n") #'mastodon-tl--goto-next-item)
+ (define-key map (kbd "p") #'mastodon-tl--goto-prev-item)
+ (define-key map (kbd "M-n") #'mastodon-tl--next-tab-item)
+ (define-key map (kbd "M-p") #'mastodon-tl--previous-tab-item)
+ (define-key map [?\t] #'mastodon-tl--next-tab-item)
+ (define-key map [backtab] #'mastodon-tl--previous-tab-item)
+ (define-key map [?\S-\t] #'mastodon-tl--previous-tab-item)
+ (define-key map [?\M-\t] #'mastodon-tl--previous-tab-item)
+ (define-key map (kbd "l") #'recenter-top-bottom)
;; navigation between timelines
- (define-key map (kbd "#") #'mastodon-tl--get-tag-timeline)
- (define-key map (kbd "\"") #'mastodon-tl--list-followed-tags)
- (define-key map (kbd "'") #'mastodon-tl--followed-tags-timeline)
- (define-key map (kbd "A") #'mastodon-profile--get-toot-author)
- (define-key map (kbd "F") #'mastodon-tl--get-federated-timeline)
- (define-key map (kbd "H") #'mastodon-tl--get-home-timeline)
- (define-key map (kbd "L") #'mastodon-tl--get-local-timeline)
- (define-key map (kbd "N") #'mastodon-notifications-get)
- (define-key map (kbd "@") #'mastodon-notifications--get-mentions)
- (define-key map (kbd "P") #'mastodon-profile--show-user)
- (define-key map (kbd "s") #'mastodon-search--query)
- (define-key map (kbd "/") #'mastodon-switch-to-buffer)
- (define-key map (kbd "\\") #'mastodon-tl--get-remote-local-timeline)
+ (define-key map (kbd "#") #'mastodon-tl--get-tag-timeline)
+ (define-key map (kbd "\"") #'mastodon-tl--list-followed-tags)
+ (define-key map (kbd "'") #'mastodon-tl--followed-tags-timeline)
+ (define-key map (kbd "A") #'mastodon-profile--get-toot-author)
+ (define-key map (kbd "F") #'mastodon-tl--get-federated-timeline)
+ (define-key map (kbd "H") #'mastodon-tl--get-home-timeline)
+ (define-key map (kbd "L") #'mastodon-tl--get-local-timeline)
+ (define-key map (kbd "N") #'mastodon-notifications-get)
+ (define-key map (kbd "@") #'mastodon-notifications--get-mentions)
+ (define-key map (kbd "P") #'mastodon-profile--show-user)
+ (define-key map (kbd "s") #'mastodon-search--query)
+ (define-key map (kbd "/") #'mastodon-switch-to-buffer)
+ (define-key map (kbd "\\") #'mastodon-tl--get-remote-local-timeline)
;; quitting mastodon
- (define-key map (kbd "q") #'kill-current-buffer)
- (define-key map (kbd "Q") #'mastodon-kill-window)
- (define-key map (kbd "M-C-q") #'mastodon-kill-all-buffers)
+ (define-key map (kbd "q") #'kill-current-buffer)
+ (define-key map (kbd "Q") #'mastodon-kill-window)
+ (define-key map (kbd "M-C-q") #'mastodon-kill-all-buffers)
;; toot actions
- (define-key map (kbd "c") #'mastodon-tl--toggle-spoiler-text-in-toot)
- (define-key map (kbd "b") #'mastodon-toot--toggle-boost)
- (define-key map (kbd "f") #'mastodon-toot--toggle-favourite)
- (define-key map (kbd "k") #'mastodon-toot--toggle-bookmark)
- (define-key map (kbd "r") #'mastodon-toot--reply)
- (define-key map (kbd "C") #'mastodon-toot--copy-toot-url)
- (define-key map (kbd "o") #'mastodon-toot--open-toot-url)
- (define-key map (kbd "v") #'mastodon-tl--poll-vote)
- (define-key map (kbd "E") #'mastodon-toot--view-toot-edits)
- (define-key map (kbd "T") #'mastodon-tl--thread)
- (define-key map (kbd "RET") #'mastodon-tl--thread)
- (define-key map (kbd "m") #'mastodon-tl--dm-user)
+ (define-key map (kbd "c") #'mastodon-tl--toggle-spoiler-text-in-toot)
+ (define-key map (kbd "b") #'mastodon-toot--toggle-boost)
+ (define-key map (kbd "f") #'mastodon-toot--toggle-favourite)
+ (define-key map (kbd "k") #'mastodon-toot--toggle-bookmark)
+ (define-key map (kbd "r") #'mastodon-toot--reply)
+ (define-key map (kbd "C") #'mastodon-toot--copy-toot-url)
+ (define-key map (kbd "o") #'mastodon-toot--open-toot-url)
+ (define-key map (kbd "v") #'mastodon-tl--poll-vote)
+ (define-key map (kbd "E") #'mastodon-toot--view-toot-edits)
+ (define-key map (kbd "T") #'mastodon-tl--thread)
+ (define-key map (kbd "RET") #'mastodon-tl--thread)
+ (define-key map (kbd "m") #'mastodon-tl--dm-user)
(when (require 'lingva nil :no-error)
- (define-key map (kbd "a") #'mastodon-toot--translate-toot-text))
- (define-key map (kbd ",") #'mastodon-toot--list-favouriters)
- (define-key map (kbd ".") #'mastodon-toot--list-boosters)
- (define-key map (kbd ";") #'mastodon-views--view-instance-description)
+ (define-key map (kbd "a") #'mastodon-toot--translate-toot-text))
+ (define-key map (kbd ",") #'mastodon-toot--list-favouriters)
+ (define-key map (kbd ".") #'mastodon-toot--list-boosters)
+ (define-key map (kbd ";") #'mastodon-views--view-instance-description)
;; override special mode binding
- (define-key map (kbd "g") #'undefined)
- (define-key map (kbd "g") #'mastodon-tl--update)
+ (define-key map (kbd "g") #'undefined)
+ (define-key map (kbd "g") #'mastodon-tl--update)
;; this is now duplicated by 'g', cd remove/use for else:
- (define-key map (kbd "u") #'mastodon-tl--update)
+ (define-key map (kbd "u") #'mastodon-tl--update)
;; own toot actions:
- (define-key map (kbd "t") #'mastodon-toot)
- (define-key map (kbd "d") #'mastodon-toot--delete-toot)
- (define-key map (kbd "D") #'mastodon-toot--delete-and-redraft-toot)
- (define-key map (kbd "i") #'mastodon-toot--pin-toot-toggle)
- (define-key map (kbd "e") #'mastodon-toot--edit-toot-at-point)
+ (define-key map (kbd "t") #'mastodon-toot)
+ (define-key map (kbd "d") #'mastodon-toot--delete-toot)
+ (define-key map (kbd "D") #'mastodon-toot--delete-and-redraft-toot)
+ (define-key map (kbd "i") #'mastodon-toot--pin-toot-toggle)
+ (define-key map (kbd "e") #'mastodon-toot--edit-toot-at-point)
;; user actions
- (define-key map (kbd "W") #'mastodon-tl--follow-user)
- (define-key map (kbd "C-S-W") #'mastodon-tl--unfollow-user)
- (define-key map (kbd "B") #'mastodon-tl--block-user)
- (define-key map (kbd "C-S-B") #'mastodon-tl--unblock-user)
- (define-key map (kbd "M") #'mastodon-tl--mute-user)
- (define-key map (kbd "C-S-M") #'mastodon-tl--unmute-user)
- (define-key map (kbd "Z") #'mastodon-tl--report-to-mods)
+ (define-key map (kbd "W") #'mastodon-tl--follow-user)
+ (define-key map (kbd "C-S-W") #'mastodon-tl--unfollow-user)
+ (define-key map (kbd "B") #'mastodon-tl--block-user)
+ (define-key map (kbd "C-S-B") #'mastodon-tl--unblock-user)
+ (define-key map (kbd "M") #'mastodon-tl--mute-user)
+ (define-key map (kbd "C-S-M") #'mastodon-tl--unmute-user)
+ (define-key map (kbd "Z") #'mastodon-tl--report-to-mods)
;; own profile
- (define-key map (kbd "O") #'mastodon-profile--my-profile)
- (define-key map (kbd "U") #'mastodon-profile--update-user-profile-note)
- (define-key map (kbd "V") #'mastodon-profile--view-favourites)
- (define-key map (kbd "K") #'mastodon-profile--view-bookmarks)
- (define-key map (kbd ":") #'mastodon-user-settings)
+ (define-key map (kbd "O") #'mastodon-profile--my-profile)
+ (define-key map (kbd "U")
#'mastodon-profile--update-user-profile-note)
+ (define-key map (kbd "V") #'mastodon-profile--view-favourites)
+ (define-key map (kbd "K") #'mastodon-profile--view-bookmarks)
+ (define-key map (kbd ":") #'mastodon-user-settings)
;; minor views
- (define-key map (kbd "R") #'mastodon-views--view-follow-requests)
- (define-key map (kbd "S") #'mastodon-views--view-scheduled-toots)
- (define-key map (kbd "I") #'mastodon-views--view-filters)
- (define-key map (kbd "G") #'mastodon-views--view-follow-suggestions)
- (define-key map (kbd "X") #'mastodon-views--view-lists)
- (define-key map (kbd "SPC") #'mastodon-tl--scroll-up-command)
- (define-key map (kbd "!") #'mastodon-tl--fold-post-toggle)
- (define-key map (kbd "z") #'bury-buffer)
+ (define-key map (kbd "R") #'mastodon-views--view-follow-requests)
+ (define-key map (kbd "S") #'mastodon-views--view-scheduled-toots)
+ (define-key map (kbd "I") #'mastodon-views--view-filters)
+ (define-key map (kbd "G") #'mastodon-views--view-follow-suggestions)
+ (define-key map (kbd "X") #'mastodon-views--view-lists)
+ (define-key map (kbd "SPC") #'mastodon-tl--scroll-up-command)
+ (define-key map (kbd "!") #'mastodon-tl--fold-post-toggle)
+ (define-key map (kbd "z") #'bury-buffer)
map)
"Keymap for `mastodon-mode'.")
- [nongnu] elpa/mastodon 10be1f9c28 18/18: Merge branch 'develop', (continued)
- [nongnu] elpa/mastodon 10be1f9c28 18/18: Merge branch 'develop', ELPA Syncer, 2024/12/02
- [nongnu] elpa/mastodon 95d06a03eb 15/18: flycheck notifs.el, ELPA Syncer, 2024/12/02
- [nongnu] elpa/mastodon 241d26dc1f 10/18: notif types: use types[] not exclude_types[], ELPA Syncer, 2024/12/02
- [nongnu] elpa/mastodon be4a64a4ff 13/18: index, ELPA Syncer, 2024/12/02
- [nongnu] elpa/mastodon ba7e98c29c 17/18: bump, ELPA Syncer, 2024/12/02
- [nongnu] elpa/mastodon 08307fee1b 14/18: notifs: require mastodon-widget, ELPA Syncer, 2024/12/02
- [nongnu] elpa/mastodon c08a84f82b 16/18: notifs cycle: buff type mentions or notifs, ELPA Syncer, 2024/12/02
- [nongnu] elpa/mastodon 00b1ac63d5 04/18: notifications--render: fallback to first id if no status_id. ??, ELPA Syncer, 2024/12/02
- [nongnu] elpa/mastodon e400757d24 03/18: view notifs by type, w completing-read. #628., ELPA Syncer, 2024/12/02
- [nongnu] elpa/mastodon 213b5b4f5f 07/18: get-toot-author: use do-if-item, not with-toot-item., ELPA Syncer, 2024/12/02
- [nongnu] elpa/mastodon 2bfd9f097d 08/18: align mastodon keymap,
ELPA Syncer <=