Fix duplicate params->query
This commit is contained in:
		
							parent
							
								
									7dff049ece
								
							
						
					
					
						commit
						d2765c2a78
					
				
					 1 changed files with 5 additions and 5 deletions
				
			
		|  | @ -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))) | ||||||
|  |  | ||||||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue