aboutsummaryrefslogtreecommitdiff
path: root/lisp/mastodon-notifications.el
diff options
context:
space:
mode:
authorHolger Dürer <me@hdurer.net>2018-08-10 13:58:22 +0100
committerJohnson Denen <johnson.denen@gmail.com>2018-08-10 22:20:04 -0400
commitc5b228ec3cb8a7e7136688062a95ddd9391cfcd5 (patch)
treedff22250d2c30d52379b0ad605b08f6db7b73c52 /lisp/mastodon-notifications.el
parent58afa3e24527c0dafeef669c285ac8ab11e3a42e (diff)
Fix boosting and faving in the notifications buffer.
Now that we calculate the base toot id, we can ensure that it is unset in notifications that do not represent a toot.
Diffstat (limited to 'lisp/mastodon-notifications.el')
-rw-r--r--lisp/mastodon-notifications.el10
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/mastodon-notifications.el b/lisp/mastodon-notifications.el
index 1ec039a..e93048d 100644
--- a/lisp/mastodon-notifications.el
+++ b/lisp/mastodon-notifications.el
@@ -67,7 +67,7 @@
"Format for a `mention' NOTE."
(let ((status (mastodon-tl--field 'status note)))
(mastodon-tl--insert-status
- note
+ status
(mastodon-tl--clean-tabs-and-nl
(if (mastodon-tl--has-spoiler status)
(mastodon-tl--spoiler status)
@@ -80,7 +80,9 @@
(defun mastodon-notifications--follow (note)
"Format for a `follow' NOTE."
(mastodon-tl--insert-status
- note
+ ;; Using reblog with an empty id will mark this as something
+ ;; non-boostable/non-favable.
+ (cons '(reblog (id . nil)) note)
(propertize "Congratulations, you have a new follower!"
'face 'default)
'mastodon-tl--byline-author
@@ -92,7 +94,7 @@
"Format for a `favourite' NOTE."
(let ((status (mastodon-tl--field 'status note)))
(mastodon-tl--insert-status
- note
+ status
(mastodon-tl--clean-tabs-and-nl
(if (mastodon-tl--has-spoiler status)
(mastodon-tl--spoiler status)
@@ -108,7 +110,7 @@
"Format for a `boost' NOTE."
(let ((status (mastodon-tl--field 'status note)))
(mastodon-tl--insert-status
- note
+ status
(mastodon-tl--clean-tabs-and-nl
(if (mastodon-tl--has-spoiler status)
(mastodon-tl--spoiler status)