diff options
author | marty hiatt <martianhiatus@riseup.net> | 2024-06-03 10:28:45 +0200 |
---|---|---|
committer | marty hiatt <martianhiatus@riseup.net> | 2024-06-03 10:28:45 +0200 |
commit | d2c1a90ec48c4d90635c673c782e266fa5dd915e (patch) | |
tree | e5fa6c3bc77769b37ca61783f20a14bbe3f7b464 /lisp | |
parent | 373d19b6cc6cc604cc34227103d95e8652016bdd (diff) |
reload on edit: only send max-id arg if we have one!
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/mastodon-tl.el | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el index 1d9795d..7345ea3 100644 --- a/lisp/mastodon-tl.el +++ b/lisp/mastodon-tl.el @@ -2554,24 +2554,25 @@ the current view." For use after e.g. deleting a toot. POS is a number, where point will be placed. Aims to respect any pagination in effect." - (let ((type (mastodon-tl--get-buffer-type))) + (let ((type (mastodon-tl--get-buffer-type)) + (max-id (mastodon-tl--buffer-property 'max-id nil :no-error))) (cond ((eq type 'home) - (mastodon-tl--get-home-timeline nil :max-id)) + (mastodon-tl--get-home-timeline nil max-id)) ((eq type 'federated) - (mastodon-tl--get-federated-timeline nil nil :max-id)) + (mastodon-tl--get-federated-timeline nil nil max-id)) ((eq type 'local) - (mastodon-tl--get-local-timeline nil :max-id)) + (mastodon-tl--get-local-timeline nil max-id)) ((eq type 'mentions) (mastodon-notifications--get-mentions)) ((eq type 'notifications) - (mastodon-notifications-get nil nil :force :max-id)) + (mastodon-notifications-get nil nil :force max-id)) ((eq type 'profile-statuses-no-boosts) ;; TODO: max-id arg needed here also (mastodon-profile--open-statuses-no-reblogs)) ((eq type 'profile-statuses) (save-excursion (goto-char (point-min)) - (mastodon-profile--get-toot-author :max-id))) + (mastodon-profile--get-toot-author max-id))) ((eq type 'thread) (save-match-data (let ((endpoint (mastodon-tl--endpoint))) |