diff options
| -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 |