diff options
| author | marty hiatt <martianhiatus@disroot.org> | 2024-10-27 16:49:05 +0100 |
|---|---|---|
| committer | marty hiatt <martianhiatus@disroot.org> | 2024-10-27 19:26:48 +0100 |
| commit | a1d3feea13416a119b6437b5f2bbeba66fb638a1 (patch) | |
| tree | d4fcd79dd1df0c241c0914c1c179fef84e831321 /lisp | |
| parent | 3eedacad7afe630b0381cc66deafaede2024867b (diff) | |
fix severance/mod warning notifs (experimental still)
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mastodon-notifications.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/mastodon-notifications.el b/lisp/mastodon-notifications.el index f688f2d..3ef8869 100644 --- a/lisp/mastodon-notifications.el +++ b/lisp/mastodon-notifications.el @@ -215,15 +215,15 @@ JSON is a list of alists." "Return a body for a severance notification GROUP." ;; FIXME: actually implement this when we encounter one in the wild! (let-alist (alist-get 'event group) - (concat .description ": " + (concat .type ": " .target_name "\nRelationships affected: " .relationships_count))) (defun mastodon-notifications--mod-warning-body (group) "Return a body for a moderation warning notification GROUP." - (let-alist (alist-get ) - (concat .description ": " + (let-alist (alist-get 'moderation_warning group) + (concat .action ": " .text "\nStatuses: " .status_ids |