forked from cadence/breezewiki
		
	Fix duplicate params->query
This commit is contained in:
		
							parent
							
								
									7dff049ece
								
							
						
					
					
						commit
						d2765c2a78
					
				
					 1 changed files with 5 additions and 5 deletions
				
			
		
							
								
								
									
										10
									
								
								src/data.rkt
									
										
									
									
									
								
							
							
						
						
									
										10
									
								
								src/data.rkt
									
										
									
									
									
								
							| 
						 | 
				
			
			@ -57,11 +57,11 @@
 | 
			
		|||
     (define res
 | 
			
		||||
       (fandom-get-api
 | 
			
		||||
        wikiname
 | 
			
		||||
        (params->query '(("action" . "query")
 | 
			
		||||
                         ("meta" . "siteinfo")
 | 
			
		||||
                         ("siprop" . "general|rightsinfo")
 | 
			
		||||
                         ("format" . "json")
 | 
			
		||||
                         ("formatversion" . "2")))))
 | 
			
		||||
        '(("action" . "query")
 | 
			
		||||
          ("meta" . "siteinfo")
 | 
			
		||||
          ("siprop" . "general|rightsinfo")
 | 
			
		||||
          ("format" . "json")
 | 
			
		||||
          ("formatversion" . "2"))))
 | 
			
		||||
     (define data (easy:response-json res))
 | 
			
		||||
     (siteinfo^ (jp "/query/general/sitename" data)
 | 
			
		||||
                (second (regexp-match #rx"/wiki/(.*)" (jp "/query/general/base" data)))
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue