             (it)))
 
         (context "putting to the agenda endpoint with an unsupported media type"
-          (with response (http-put-request "/circles/1234/governance/5678/agenda"
-                                           "New agenda"
-                                           {:content-type "application/json"}))
+          (with response (http-request :put
+                                       "/circles/1234/governance/5678/agenda"
+                                       {:body "New agenda"
+                                        :content-type "application/json"}))
           (it "should return a 415"
             (should= 415 (:status @response))))
 
         (context "putting to the agenda endpoint"
-          (with response (http-put-request "/circles/1234/governance/5678/agenda"
-                                           "New agenda"))
+          (with response (http-request :put
+                                       "/circles/1234/governance/5678/agenda"
+                                       {:body "New agenda"}))
 
           (it "should return a 201"
             (should= 201 (:status @response))))
 
         (context "getting the agenda endpoint"
-          (with response (http-get-request "/circles/1234/governance/5678/agenda"))
+          (with response (http-request :get "/circles/1234/governance/5678/agenda"))
           (it "should return an empty agenda"
             (should= 200 (:status @response))
             (should-contain "text/plain" (get-in @response

                            (:body @response))))

        (context "putting to the governance resource"
          (with response (http-put-request "/circles/1234/governance/5678"))
          (it "should return a 204"
            (should= 204 (:status @response))))

        (context "putting to the agenda endpoint"
          (with response (http-put-request "/circles/1234/governance/5678/agenda"
                                           "New agenda"))

          (it "should return a 400"
            (should= 400 (:status @response))
            (should-contain "Agenda is closed" (:body @response))))

        (context "getting the agenda endpoint"
          (with response (http-get-request "/circles/1234/governance/5678/agenda"))
          (it "should return 400"
            (should= 400 (:status @response))
            (should-contain "Agenda is closed" (:body @response))))))))

            (it)))

        (context "getting the governance resource"
          (with response (http-request :get "/circles/1234/governance/5678"))
          (it "should return a 200"
            (should= 200 (:status @response)))
          (it "should return that an open meeting exists"
