aboutsummaryrefslogtreecommitdiff
path: root/lisp/mastodon-tl.el
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus [a t] riseup [d o t] net>2023-05-10 14:54:01 +0200
committermarty hiatt <martianhiatus [a t] riseup [d o t] net>2023-05-11 09:55:16 +0200
commit9722f59b00fe76994d01ce980d619bb04b87b9ff (patch)
tree9ad231fd3bc89d50afd00ca73156f5bb7f2f0841 /lisp/mastodon-tl.el
parenta9e810c5e7344fb99b984e08c18f690c686a0d0b (diff)
remove overlays in tl--init*/-sync
Diffstat (limited to 'lisp/mastodon-tl.el')
-rw-r--r--lisp/mastodon-tl.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el
index 79897bd..9920aeb 100644
--- a/lisp/mastodon-tl.el
+++ b/lisp/mastodon-tl.el
@@ -2509,12 +2509,13 @@ RESPONSE is the data returned from the server by
JSON and http headers, without it just the JSON."
(let ((json (if headers (car response) response)))
(if (not json) ; praying this is right here, else try "\n[]"
- (message "Looks like nothing returned from endpoint: %s" endpoint)
+ (message "Looks like nothing returned from endpoint: %s" endpoint)
(let* ((headers (if headers (cdr response) nil))
(link-header (mastodon-tl--get-link-header-from-response headers)))
(with-mastodon-buffer buffer #'mastodon-mode nil
(mastodon-tl--set-buffer-spec buffer endpoint update-function
link-header update-params hide-replies)
+ (remove-overlays) ; video overlays
(funcall update-function json)
(setq
;; Initialize with a minimal interval; we re-scan at least once
@@ -2552,6 +2553,7 @@ Optional arg NOTE-TYPE means only get that type of note."
;; every 5 minutes to catch any timestamps we may have missed
mastodon-tl--timestamp-next-update (time-add (current-time)
(seconds-to-time 300)))
+ (remove-overlays) ; video overlays
(funcall update-function json)
(mastodon-tl--set-buffer-spec buffer endpoint update-function nil args)
(setq mastodon-tl--timestamp-update-timer