Getting an access token from Twitter

access-token.clj

(defn get-token []
  (let [options {
          :basic-auth [app-consumer-key app-consumer-secret]
          :form-params {:grant_type "client_credentials"}}
        result (client/post token-url options)
        body-json (json/read-str (:body result) :key-fn keyword)]
    (:access_token body-json)))