    (http-put-request uri body nil))
   ([uri body options]
    (http-client/put (str "http://localhost:3000" uri) 
-                     (merge {:throw-exceptions false
-                             :content-type :json
-                             :body body} options))))
+                    (merge {:throw-exceptions false
+                            :content-type :json
+                            :body body} options))))
 (defn http-post-request 
   ([uri body]
    (http-post-request uri body nil))

            (xit "should return the location of the updated resource")))

        (context "with creating a role"
          (context "with valid parameters"
            (with response (http-post-request 
                             "/" 
                             (json/generate-string
                               {:command "addRole",
                                :params {:name "Test Circle!"
                                         :lead-link-name "Bill"
                                         :lead-link-email "bfinn@example.com"}})))
            (it "should return the location of the newly created resource"
                 (should= 201 (:status @response))
                 (should= (str "/" (url-encode "Test Circle!")) 
                          (get-location @response))))))

      (should-return-4xx "with invalid paramaters" 
                         (fn [] "circles")
                         (json/generate-string {:foo "Test Circle!"})
                         400
                         "IllegalArgumentException")
      (should-return-4xx "with missing paramaters" 
                         (fn [] "circles")
                         (json/generate-string {:name "Test Circle!"})
                         400
                         "IllegalArgumentException")
      (should-return-4xx "with malformed JSON" 
                         (fn [] "circles")
                         "{\"name\" :: \"Bill\""
                         400
                         "IOException"))

(context "with a created circle"
  (with location (get-location (http-post-request


      (context "with valid parameters"
        (with create-anchor-circle-response (http-post-request 
                                              "/" 
                                              (json/generate-string
                                                {:command "anchorCircle",
                                                 :params {:name "Test Circle!"
                                                          :lead-link-name "Bill"
                                                          :lead-link-email "bfinn@example.com"}})))
        (before @create-anchor-circle-response)

        (it "should return the location of the newly created resource"
