diff options
| author | mousebot <mousebot@riseup.net> | 2022-02-18 17:26:18 +0100 |
|---|---|---|
| committer | mousebot <mousebot@riseup.net> | 2022-02-18 17:26:18 +0100 |
| commit | 34440b68ff6d3430428372d2968adc55ea9c6f03 (patch) | |
| tree | cf5a6e9878a11e4285b7d3c2af8dc92d5e7fe008 | |
| parent | 4f582388e0594753d15f0d386cbb1ab2eaad5a02 (diff) | |
test and message for foll reqs process
just feedback for when we call it when not on anything
| -rw-r--r-- | lisp/mastodon-notifications.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/mastodon-notifications.el b/lisp/mastodon-notifications.el index 40f9c04..df4f9c0 100644 --- a/lisp/mastodon-notifications.el +++ b/lisp/mastodon-notifications.el @@ -86,7 +86,8 @@ With no argument, the request is accepted. Argument REJECT means reject the request. Can be called in notifications view or in follow-requests view." (interactive) - (when (mastodon-tl--find-property-range 'toot-json (point)) + (if (not (mastodon-tl--find-property-range 'toot-json (point))) + (message "No follow request at point?") (let* ((toot-json (mastodon-tl--property 'toot-json)) (f-reqs-view-p (string= "follow_requests" (plist-get mastodon-tl--buffer-spec 'endpoint))) |