aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus@riseup.net>2024-06-04 17:19:54 +0200
committermarty hiatt <martianhiatus@riseup.net>2024-06-04 17:20:29 +0200
commit638045a2b2e76d506eab61f7aca23b5439299c39 (patch)
treea6e0b227bb8547acf95b2be55158190042ed5bcd
parentb743ca81fcd1883d9ac80daf5ec151b2fd7e94b6 (diff)
add remove-overlays to with-mastodon-buffer macro
-rw-r--r--lisp/mastodon-profile.el1
-rw-r--r--lisp/mastodon-tl.el2
2 files changed, 1 insertions, 2 deletions
diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el
index 069334a..de16b7d 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 62e4c81..166a0a4 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)