From 854b7027bc390807876595d2a014e9e61abad591 Mon Sep 17 00:00:00 2001 From: marty hiatt Date: Fri, 18 Oct 2024 11:38:35 +0200 Subject: images in threads: load images for single-toot and thread toot --- lisp/mastodon-tl.el | 8 ++++++++ 1 file changed, 8 insertions(+) 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: -- cgit v1.2.3