diff options
author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-01-16 11:11:06 +0100 |
---|---|---|
committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-01-16 11:16:43 +0100 |
commit | 3995df553dac02aa9cb8a3d70c062bf10d047985 (patch) | |
tree | e6cdf7bcb28814b78a8f5c2d1331dbf7dc99a1fa | |
parent | 098f8b1e73e10801c55d4c470906bca6edd75251 (diff) |
bindings: view scheduled on 's' move translate to 'a'
-rw-r--r-- | lisp/mastodon-discover.el | 5 | ||||
-rw-r--r-- | lisp/mastodon.el | 3 |
2 files changed, 5 insertions, 3 deletions
diff --git a/lisp/mastodon-discover.el b/lisp/mastodon-discover.el index 8506410..f16cdf6 100644 --- a/lisp/mastodon-discover.el +++ b/lisp/mastodon-discover.el @@ -70,7 +70,7 @@ ("E" "View edits of (your) toot" mastodon-toot--view-toot-edits) ("i" "Pin/Unpin (your) toot" mastodon-toot--pin-toot-toggle) ("P" "View user profile" mastodon-profile--show-user) - ("s" "Translate toot at point" mastodon-toot--translate-toot-text) + ("a" "Translate toot at point" mastodon-toot--translate-toot-text) ("T" "View thread" mastodon-tl--thread) ("v" "Vote on poll" mastodon-tl--poll-vote)) ("Views" @@ -90,7 +90,8 @@ ("R" "View follow requests" mastodon-profile--view-follow-requests) ("G" "View follow suggestions" mastodon-tl--get-follow-suggestions) ("I" "View filters" mastodon-tl--view-filters) - ("X" "View lists" mastodon-tl--view-lists)) + ("X" "View lists" mastodon-tl--view-lists) + ("s" "View scheduled toots" mastodon-tl--view-scheduled-toots)) ("Users" ("W" "Follow" mastodon-tl--follow-user) ("C-S-W" "Unfollow" mastodon-tl--unfollow-user) diff --git a/lisp/mastodon.el b/lisp/mastodon.el index ff9888e..384c4c3 100644 --- a/lisp/mastodon.el +++ b/lisp/mastodon.el @@ -203,7 +203,8 @@ Use. e.g. \"%c\" for your locale's date and time format." (define-key map (kbd "e") #'mastodon-toot--edit-toot-at-point) (define-key map (kbd "E") #'mastodon-toot--view-toot-edits) (when (require 'lingva nil :no-error) - (define-key map (kbd "s") #'mastodon-toot--translate-toot-text)) + (define-key map (kbd "a") #'mastodon-toot--translate-toot-text)) + (define-key map (kbd "s") #'mastodon-tl--view-scheduled-toots) (define-key map (kbd "M-C-q") #'mastodon-kill-all-buffers) map) "Keymap for `mastodon-mode'.") |