diff options
author | mousebot <mousebot@riseup.net> | 2022-03-10 13:09:47 +0100 |
---|---|---|
committer | mousebot <mousebot@riseup.net> | 2022-03-10 13:09:47 +0100 |
commit | a14ecfce170e82ae610247b8ed1854077deed8c0 (patch) | |
tree | 110797b752882328b1c8b52b1988a7adf9677505 /lisp/mastodon-tl.el | |
parent | d90c104299636f2525f8b77001b4374e5b0df72a (diff) |
display image caption in help echo
Diffstat (limited to 'lisp/mastodon-tl.el')
-rw-r--r-- | lisp/mastodon-tl.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el index 7a346c1..6cd3ff0 100644 --- a/lisp/mastodon-tl.el +++ b/lisp/mastodon-tl.el @@ -817,10 +817,11 @@ message is a link which unhides/hides the main body." (or (alist-get 'remote_url media-attachement) ;; fallback b/c notifications don't have remote_url (alist-get 'url media-attachement))) - (type (alist-get 'type media-attachement))) + (type (alist-get 'type media-attachement)) + (caption (alist-get 'description media-attachement))) (if mastodon-tl--display-media-p (mastodon-media--get-media-link-rendering - preview-url remote-url type) ; 2nd arg for shr-browse-url + preview-url remote-url type caption) ; 2nd arg for shr-browse-url (concat "Media::" preview-url "\n")))) media-attachements ""))) (if (not (and mastodon-tl--display-media-p |