Fix gelbooru URL

booru.lisp

@@ -46,6 +46,6 @@
            :rating-posts (make-ratings (74000 53000 92000)))
 
 (add-booru :name 'gelbooru
-           :url "https://gelbooru.com/index.php?page=dapi&s=post&q=index&json=1&tags=loli+rating:~a&limit=1&pid=~a"
+           :url "https://gelbooru.com/index.php?page=dapi&s=post&q=index&json=1&tags={loli ~ child}+rating:~a&limit=1&pid=~a"
            :rating-posts (make-ratings (20000 20000 20000))
            :rating-table ratings-full-words)

lolicore.lisp

@@ -1,6 +1,6 @@
 (in-package #:lolicore)
 
-(defun loli-link (rating )
+(defun loli-link (rating)
   "Generate a valid link to a loli image from a random booru"
   (let ((booru (cl-rng:within *boorus*)))
     (format nil (url booru)
@@ -9,7 +9,7 @@
 
 (defun loli-json (rating)
   "Get a link using `loli-link', download it and return parsed JSON"
-  (car (jsown:parse (dex:get (loli-link rating)))))
+    (car (jsown:parse (dex:get (loli-link rating)))))
 
 (defun loli-data (json &key tags file-url
                   &aux (lst '()))