aboutsummaryrefslogtreecommitdiff
path: root/lisp/mastodon-tl.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/mastodon-tl.el')
-rw-r--r--lisp/mastodon-tl.el7
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el
index 2c9c080..e186bd5 100644
--- a/lisp/mastodon-tl.el
+++ b/lisp/mastodon-tl.el
@@ -674,10 +674,15 @@ it is `mastodon-tl--byline-boosted'"
'mastodon-tl--byline-boosted))
(defun mastodon-tl--timeline (toots)
+ "Display each toot in TOOTS."
+ (mapc 'mastodon-tl--toot toots)
+ (goto-char (point-min)))
+
+(defun mastodon-tl--timeline-pinned (toots)
"Display each toot in TOOTS.
If any toots are pinned, display them first."
- (let* ((pinned-list))
+ (let ((pinned-list))
(mapc (lambda (toot)
(when (equal (cdr (assoc 'pinned toot)) 't)
(push toot pinned-list)))