Fix duplicate params->query

This commit is contained in:
Cadence Ember 2024-05-02 00:01:32 +12:00
parent 7dff049ece
commit d2765c2a78
1 changed files with 5 additions and 5 deletions

View File

@ -57,11 +57,11 @@
(define res (define res
(fandom-get-api (fandom-get-api
wikiname wikiname
(params->query '(("action" . "query") '(("action" . "query")
("meta" . "siteinfo") ("meta" . "siteinfo")
("siprop" . "general|rightsinfo") ("siprop" . "general|rightsinfo")
("format" . "json") ("format" . "json")
("formatversion" . "2"))))) ("formatversion" . "2"))))
(define data (easy:response-json res)) (define data (easy:response-json res))
(siteinfo^ (jp "/query/general/sitename" data) (siteinfo^ (jp "/query/general/sitename" data)
(second (regexp-match #rx"/wiki/(.*)" (jp "/query/general/base" data))) (second (regexp-match #rx"/wiki/(.*)" (jp "/query/general/base" data)))