Servlet4.clj

(deftest create-a-game
  (let [request {:request-method :post
                 :uri "/games"
                 :body {:id 5
                        :title "Dark Souls"
                        :releaseDate "2011-09-22"
                        :develop "FromSoftware"}}
        ;; Maak een handler die onze create function aanroept met de request content
        handler (fn [request] (create (request :body)))
        ;; Wrap de handler met onze mock servlet
        response ((mock-servlet handler) request)]
    (is (= 201 (response :status)))
    (is (= "/games/5" (get-in response [:headers "Location"])))))