 ;     game.submit2 = "Stealth Save"
 
 ;     -- create request
-;     local r,e = request(self, game, "POST", "http://backloggery.com/update.php?user="..self.user.."&gameid="..game.id)
+;     local r,e = request(self, game, "POST", "https://backloggery.com/update.php?user="..self.user.."&gameid="..game.id)
 
 ;     -- update internal structures
 ;     self:games()[game.id] = game

        body (map (fn [[k v]] {:name k :content v}) params)]
    (printf "Adding %s game '%s' to backloggery:" (:progress game) (:name game))
    (let [response (http/post
                     "http://backloggery.com/newgame.php"
                     {:cookies cookies
                      ;:debug true :debug-body true
                      :query-params {"user" user}

                  "console" "" "rating" "" "status" "" "unplayed" "" "own" "" "search" ""
                  "comments" "" "region" "" "region_u" "0" "wish" "" "alpha" ""}
        params (conj defaults params)
        response (http/get "https://backloggery.com/ajax_moregames.php"
                           {:cookies cookies
                            :query-params params
                            :headers {"referer" (str "https://backloggery.com/games.php?user=" user)}})]
    (-> response :body java.io.StringReader. html/parse)))

(defn- bl-get-compilation
