branch: elpa/mastodon
commit 638045a2b2e76d506eab61f7aca23b5439299c39
Author: marty hiatt <[email protected]>
Commit: marty hiatt <[email protected]>
add remove-overlays to with-mastodon-buffer macro
---
lisp/mastodon-profile.el | 1 -
lisp/mastodon-tl.el | 2 +-
2 files changed, 1 insertion(+), 2 deletions(-)
diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el
index 069334a23d..de16b7d216 100644
--- a/lisp/mastodon-profile.el
+++ b/lisp/mastodon-profile.el
@@ -645,7 +645,6 @@ MAX-ID is a flag to include the max_id pagination
parameter."
(relationships (mastodon-profile--relationships-get .id)))
(with-mastodon-buffer buffer #'mastodon-mode nil
(mastodon-profile-mode)
- (remove-overlays)
(setq mastodon-profile--account account)
(mastodon-tl--set-buffer-spec buffer endpoint update-function
link-header args nil max-id-str)
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el
index 62e4c81657..166a0a4b2b 100644
--- a/lisp/mastodon-tl.el
+++ b/lisp/mastodon-tl.el
@@ -323,6 +323,7 @@ than `pop-to-buffer'."
(let ((inhibit-read-only t))
(erase-buffer)
(funcall ,mode-fun)
+ (remove-overlays) ; video overlays
(if ,other-window
(switch-to-buffer-other-window ,buffer)
(pop-to-buffer ,buffer '(display-buffer-same-window)))
@@ -2000,7 +2001,6 @@ view all branches of a thread."
;; if we have a thread:
(with-mastodon-buffer buffer #'mastodon-mode nil
(let ((marker (make-marker)))
- (remove-overlays) ; video overlays
(mastodon-tl--set-buffer-spec buffer endpoint
#'mastodon-tl--thread)
(mastodon-tl--timeline (alist-get 'ancestors context)
:thread)
