diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mastodon-profile.el | 5 | ||||
| -rw-r--r-- | lisp/mastodon-tl.el | 9 | 
2 files changed, 9 insertions, 5 deletions
diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el index 6af9a94..090f685 100644 --- a/lisp/mastodon-profile.el +++ b/lisp/mastodon-profile.el @@ -238,8 +238,9 @@ NO-REBLOGS means do not display boosts in statuses."    (mastodon-tl--init-sync "follow-requests"                            "follow_requests"                            'mastodon-profile--insert-follow-requests) -  (use-local-map mastodon-profile--view-follow-requests-keymap) -  (mastodon-tl--goto-first-item)) +  (mastodon-tl--goto-first-item) +  (with-current-buffer "*mastodon-follow-requests*" +    (use-local-map mastodon-profile--view-follow-requests-keymap)))  (defun mastodon-profile--insert-follow-requests (json)    "Insert the user's current follow requests. diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el index c969853..0309634 100644 --- a/lisp/mastodon-tl.el +++ b/lisp/mastodon-tl.el @@ -1900,7 +1900,8 @@ If ID is provided, delete that list."    (mastodon-tl--init-sync "lists"                            "lists"                            'mastodon-tl--insert-lists) -  (use-local-map mastodon-tl--view-lists-keymap)) +  (with-current-buffer "*mastodon-lists*" +    (use-local-map mastodon-tl--view-lists-keymap)))  (defun mastodon-tl--insert-lists (_json)    "Insert the user's lists from JSON." @@ -2191,7 +2192,8 @@ Prompt for a context, must be a list containting at least one of \"home\",    (mastodon-tl--init-sync "filters"                            "filters"                            'mastodon-tl--insert-filters) -  (use-local-map mastodon-tl--view-filters-keymap)) +  (with-current-buffer "*mastodon-filters*" +    (use-local-map mastodon-tl--view-filters-keymap)))  (defun mastodon-tl--insert-filters (json)    "Insert the user's current filters. @@ -2253,7 +2255,8 @@ JSON is what is returned by by the server."    (mastodon-tl--init-sync "follow-suggestions"                            "suggestions"                            'mastodon-tl--insert-follow-suggestions) -  (use-local-map mastodon-tl--follow-suggestions-map)) +  (with-current-buffer "*mastodon-follow-suggestions*" +    (use-local-map mastodon-tl--follow-suggestions-map)))  (defun mastodon-tl--insert-follow-suggestions (response)    "Insert follow suggestions into buffer.  | 
