diff options
| author | marty hiatt <martianhiatus@riseup.net> | 2024-10-04 16:09:28 +0200 | 
|---|---|---|
| committer | marty hiatt <martianhiatus@riseup.net> | 2024-10-04 16:09:28 +0200 | 
| commit | 1c1a195b09c995b2a1f17dcc3f6830e7f0737c69 (patch) | |
| tree | 2469f2a442b76a31cc5c31aae55ab8a52ca293ef | |
| parent | 7f58100471c245d9b769aa9996658437cc505b47 (diff) | |
fix display/links of Media: links with captions
| -rw-r--r-- | lisp/mastodon-tl.el | 11 | 
1 files changed, 6 insertions, 5 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el index 1068a8c..2e0588f 100644 --- a/lisp/mastodon-tl.el +++ b/lisp/mastodon-tl.el @@ -1183,8 +1183,9 @@ SENSITIVE is a flag from the item's JSON data."             (concat "Media:: "                     (if (and mastodon-tl--display-caption-not-url-when-no-media                              .description) -                       .description) -                   .preview_url))) +                       .description +                     .preview_url))) +          (remote-url (or .remote_url .url)))        (if (and mastodon-tl--display-media-p                 ;; if in notifs, also check notifs images custom:                 (if (or (mastodon-tl--buffer-type-eq 'notifications) @@ -1192,12 +1193,12 @@ SENSITIVE is a flag from the item's JSON data."                     mastodon-notifications--images-in-notifs                   t))            (mastodon-media--get-media-link-rendering ; placeholder: "[img]" -           .preview_url (or .remote_url .url) ; for shr-browse-url +           .preview_url remote-url ; for shr-browse-url             .type .description sensitive)          ;; return URL/caption:          (concat (mastodon-tl--propertize-img-str-or-url                   (concat "Media:: " .preview_url) ; string -                 .preview_url .remote_url .type .description +                 .preview_url remote-url .type .description                   display-str 'shr-link .description sensitive)                  "\n"))))) @@ -1220,7 +1221,7 @@ SENSITIVE is a flag from the item's JSON data."                'face face                'mouse-face 'highlight                'mastodon-tab-stop 'image ; for do-link-action-at-point -              'image-url full-remote-url ; for shr-browse-image +              'image-url (or full-remote-url media-url) ; for shr-browse-image                'keymap mastodon-tl--shr-image-map-replacement                'image-description caption                'sensitive sensitive  | 
