aboutsummaryrefslogtreecommitdiff
path: root/lisp/mastodon-profile.el
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus [a t] riseup [d o t] net>2023-01-11 00:23:48 +1100
committermarty hiatt <martianhiatus [a t] riseup [d o t] net>2023-01-11 00:36:36 +1100
commit3b35b51a36976d64bc3368d6bd8cce5edb350839 (patch)
tree8d3547294fe3b7cc8e1a147c6606c55e5281a7fa /lisp/mastodon-profile.el
parent0db46a8da2af73bc07ac36be43777c522cbfb57d (diff)
customize number of posts displayed in a timeline or account view
FIXES #363
Diffstat (limited to 'lisp/mastodon-profile.el')
-rw-r--r--lisp/mastodon-profile.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el
index 7e3262a..f96ecb5 100644
--- a/lisp/mastodon-profile.el
+++ b/lisp/mastodon-profile.el
@@ -621,7 +621,8 @@ FIELDS means provide a fields vector fetched by other means."
NO-REBLOGS means do not display boosts in statuses.
HEADERS means also fetch link headers for pagination."
(let* ((id (mastodon-profile--account-field account 'id))
- (args (when no-reblogs '(("exclude_reblogs" . "t"))))
+ (args `(("limit" . ,mastodon-tl--timeline-posts-count)))
+ (args (if no-reblogs (push '("exclude_reblogs" . "t") args) args))
(endpoint (format "accounts/%s/%s" id endpoint-type))
(url (mastodon-http--api endpoint))
(acct (mastodon-profile--account-field account 'acct))