summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMasaya Tojo <masaya@tojo.tokyo>2020-07-09 05:00:19 +0900
committerMasaya Tojo <masaya@tojo.tokyo>2020-07-09 05:00:51 +0900
commit81739d5467f40e05a8ddd5c06675f278c60f464e (patch)
tree0a59422a46d74df897cbe1de521e74bc723a2869
parent2a2aa4aa384e031a9467bfb58c090f60cd88c4a1 (diff)
qkbox: toot: timeline: Use <status> record.
-rw-r--r--qkbox/toot.scm8
1 files changed, 1 insertions, 7 deletions
diff --git a/qkbox/toot.scm b/qkbox/toot.scm
index de891d9..1de9fb4 100644
--- a/qkbox/toot.scm
+++ b/qkbox/toot.scm
@@ -185,13 +185,7 @@
#:local? local?))
(case (response-code res)
((200)
- (map (lambda (status)
- `((id . ,(assoc-ref status "id"))
- (name . ,(assoc-ref (assoc-ref status "account")
- "display_name"))
- (url . ,(assoc-ref status "url"))
- (content . ,(assoc-ref status "content"))))
- (vector->list body)))
+ (map make-status (vector->list body)))
((206)
(error "timeline: Home feed is regenerating"))
(else