southfox/liberty-hu
1
0
Fork 0
Code Issues 2 Pull requests Projects Releases Packages Wiki Activity Actions

[front/perf] the page is lie

Browse source
This commit is contained in:
SouthFox 2023-09-20 20:01:36 +08:00
parent 29babcb300
commit 73d9a21353
1 changed files with 3 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
src/main/backend/handlers.clj
View file

@ -159,8 +159,7 @@
[question-id docs] [question-id docs]
(let [next-url (get docs "next")] (let [next-url (get docs "next")]
{:paging (merge {:paging (merge
{"page" (get docs "page") {"is_end" (get docs "is_end")
"is_end" (get docs "is_end")
"question_id" question-id} "question_id" question-id}
(build-paging-next next-url))})) (build-paging-next next-url))}))
@ -168,12 +167,10 @@
[question-id docs] [question-id docs]
(let [answers (val (first (get docs "answers")))] (let [answers (val (first (get docs "answers")))]
(if (< (count (get answers "ids")) 5) (if (< (count (get answers "ids")) 5)
{:paging {"page" nil {:paging {"is_end" true}}
"is_end" true}}
(let [next_url (get answers "next")] (let [next_url (get answers "next")]
{:paging (merge {:paging (merge
{"page" nil {"is_end" false
"is_end" false
"question_id" question-id} "question_id" question-id}
(build-paging-next next_url))})))) (build-paging-next next_url))}))))