(defn get-login-type-flows2
  "returns the flows containing the login types supported by the homerserver as a hashmap representing the json"
  [login-url]
  (let [login-json-hashmap (http/get login-url)
        login-flows-json-str (:body login-json-hashmap)
        login-flows-json-hashmap (json/read-str)]
    login-flows-json-hashmap))

(defn get-login-type-flows
  "returns the flows containing the login types supported by the homeserver as a hashmap representing the json"
  [login-url]
  (-> login-url http/get :body json/read-str))