diff options
| author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-03-21 16:04:11 +0100 |
|---|---|---|
| committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-03-21 16:04:11 +0100 |
| commit | 21caf882946086ecf61e6ad9c911abbc35d2ad72 (patch) | |
| tree | e51f825213f62073460002cba161930eaa6755f5 | |
| parent | e0a9e94d46463a2a6fafb019a36cd81c91e1bb8a (diff) | |
add unique buffer name to profile statuses without boosts
| -rw-r--r-- | lisp/mastodon-profile.el | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el index 331b5c9..9030d97 100644 --- a/lisp/mastodon-profile.el +++ b/lisp/mastodon-profile.el @@ -570,7 +570,11 @@ HEADERS means also fetch link headers for pagination." (endpoint (format "accounts/%s/%s" id endpoint-type)) (url (mastodon-http--api endpoint)) (acct (mastodon-profile--account-field account 'acct)) - (buffer (concat "*mastodon-" acct "-" endpoint-type "*")) + (buffer (concat "*mastodon-" acct "-" + (if no-reblogs + (concat endpoint-type "-no-boosts") + endpoint-type) + "*")) (response (if headers (mastodon-http--get-response url args) (mastodon-http--get-json url args))) @@ -617,7 +621,9 @@ HEADERS means also fetch link headers for pagination." (is-followers (string= endpoint-type "followers")) (is-following (string= endpoint-type "following")) (endpoint-name (cond - (is-statuses " TOOTS ") + (is-statuses (if no-reblogs + " TOOTS (no boosts)" + " TOOTS ")) (is-followers " FOLLOWERS ") (is-following " FOLLOWING ")))) (insert |