diff options
author | marty hiatt <martianhiatus@riseup.net> | 2024-10-18 11:38:35 +0200 |
---|---|---|
committer | marty hiatt <martianhiatus@riseup.net> | 2024-10-18 11:38:35 +0200 |
commit | 854b7027bc390807876595d2a014e9e61abad591 (patch) | |
tree | a8da83940abd14dec04c3173e175649b9d3b7d34 /lisp | |
parent | 390c1d0c2dec6f247830cd507d8d1e8ca4db3479 (diff) |
images in threads: load images for single-toot and thread toot
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/mastodon-tl.el | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el index 92bf0a6..b0f5981 100644 --- a/lisp/mastodon-tl.el +++ b/lisp/mastodon-tl.el @@ -2281,6 +2281,9 @@ ID is that of the toot to view." #'mastodon-tl--update-toot) (mastodon-tl--toot toot :detailed-p) (goto-char (point-min)) + (when mastodon-tl--display-media-p + (mastodon-media--inline-images (point-min) + (point-max))) (mastodon-tl--goto-next-item :no-refresh))))) (defun mastodon-tl--update-toot (json) @@ -2339,6 +2342,11 @@ view all branches of a thread." (move-marker marker (point)) ;; print re-fetched toot: (mastodon-tl--toot toot :detailed-p :thread) + ;; inline images only for the toot + ;; (`mastodon-tl--timeline' handles the rest): + (when mastodon-tl--display-media-p + (mastodon-media--inline-images marker ;start-pos + (point))) (mastodon-tl--timeline (alist-get 'descendants context) :thread) ;; put point at the toot: |