From ff758ff681e4549913998f461ee90562f04ee7e3 Mon Sep 17 00:00:00 2001 From: marty hiatt Date: Wed, 24 Apr 2024 21:21:57 +0200 Subject: store notif type as prop so we can limit item actions by notif type --- lisp/mastodon-tl.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el index c3147b6..fa0c7bb 100644 --- a/lisp/mastodon-tl.el +++ b/lisp/mastodon-tl.el @@ -1434,7 +1434,8 @@ THREAD means the status will be displayed in a thread view." (reply-to-id (alist-get 'in_reply_to_id toot)) (after-reply-status-p (when (and thread reply-to-id) - (mastodon-tl--after-reply-status reply-to-id)))) + (mastodon-tl--after-reply-status reply-to-id))) + (type (alist-get 'type toot))) (insert (propertize (concat @@ -1461,7 +1462,8 @@ THREAD means the status will be displayed in a thread view." toot)) ; else normal toot with reblog check 'item-json toot 'base-toot base-toot - 'cursor-face 'mastodon-cursor-highlight-face) + 'cursor-face 'mastodon-cursor-highlight-face + 'notification-type type) "\n") (when mastodon-tl--display-media-p (mastodon-media--inline-images start-pos (point))))) -- cgit v1.2.3