diff options
| -rw-r--r-- | lisp/mastodon-tl.el | 11 |
1 files changed, 4 insertions, 7 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el index a992055..93ea20c 100644 --- a/lisp/mastodon-tl.el +++ b/lisp/mastodon-tl.el @@ -534,13 +534,10 @@ Used when point is at the start of a byline, i.e. where The result is added as an attachments property to author-byline." (let ((media-attachments (mastodon-tl--field 'media_attachments toot))) (mapcar - (lambda (attachement) - (let ((remote-url - (or (alist-get 'remote_url attachement) - ;; fallback b/c notifications don't have remote_url - (alist-get 'url attachement))) - (type (alist-get 'type attachement))) - `(:url ,remote-url :type ,type))) + (lambda (attachment) + (let-alist attachment + `(:url ,(or .remote_url .url) ; fallback for notifications + :type ,.type))) media-attachments))) (defun mastodon-tl--byline-boosted (toot) |