From 447081217888977ecfcbe8a005566f44929a16e6 Mon Sep 17 00:00:00 2001 From: marty hiatt Date: Sun, 13 Nov 2022 11:23:39 +0100 Subject: change foll-reqs view reject binding to 'j', like notifs view then 'r' is only ever used for reply, even tho not avail in fr view --- README.org | 2 +- lisp/mastodon-profile.el | 5 ++++- 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/README.org b/README.org index fc238a1..ffe65df 100644 --- a/README.org +++ b/README.org @@ -133,7 +133,7 @@ take place if your =mastodon-token-file= does not contain =:client_id= and | | *Other views* | | =S= | search (posts, users, tags) (NB: only posts you have interacted with) | | =I=, =c=, =d= | view, create, and delete filters | -| =R=, =a=, =r= | view/accept/reject follow requests | +| =R=, =a=, =j= | view/accept/reject follow requests | | =G= | view follow suggestions | | =V= | view your favourited toots | | =K= | view bookmarked toots | diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el index ea73b99..63c062b 100644 --- a/lisp/mastodon-profile.el +++ b/lisp/mastodon-profile.el @@ -94,7 +94,10 @@ (defvar mastodon-profile--view-follow-requests-keymap (let ((map ;(make-sparse-keymap))) (copy-keymap mastodon-mode-map))) - (define-key map (kbd "r") #'mastodon-notifications--follow-request-reject) + ;; make reject binding match the binding in notifs view + ;; 'r' is then reserved for replying, even tho it is not avail + ;; in foll-reqs view + (define-key map (kbd "j") #'mastodon-notifications--follow-request-reject) (define-key map (kbd "a") #'mastodon-notifications--follow-request-accept) (define-key map (kbd "n") #'mastodon-tl--goto-next-item) (define-key map (kbd "p") #'mastodon-tl--goto-prev-item) -- cgit v1.2.3