   (let [uri (get-in context [:request :uri])
         uri-list (split uri #"/")
         circle-name (url-decode (first (take-last index uri-list)))
-        circle (get @circles circle-name)]
+        circle (get @anchor-circle circle-name)]
     (if circle
       [true {::circle-name circle-name ::circle circle}]
       [false {:message (format "Circle '%s' does not exist." circle-name)}])))

  (let [{:keys [name purpose domains accountabilities]} (get context ::json-data)
        circle-name (::circle-name context)]
    (try
      (dosync (alter circles assoc circle-name 
                     (g/add-role (::circle context) 
                                 name purpose domains accountabilities)))
      {::role-data (:roles (get @circles circle-name)) 
       ::url-encoded-role-id (url-encode name)}
      (catch IllegalArgumentException e
        ;(.printStackTrace e)

      ret-val)))

(defresource anchor-circle-resource
  :handle-ok (fn[_] (json/generate-string @anchor-circle))
  :allowed-methods [:get])

(defresource implicit-circle-resource
