gistfile1.clj

;; Option 1: Return the response
(with-authentication state-with-auth-creds
                     clj-http.client/post
                     "http://some.url/api"
                     {:accept :json :headers {"X-foo" "bar"}})
;-> {:status 200 :body "looks good"}

;; Option 2: Return a wrapped request method
(def authenticating-post
  (with-authentication state-with-auth-creds clj-http.client/post))
(authenticating-post "http://some.url/api"
                     {:accept :json :headers {"X-foo" "bar"}})
;-> {:status 200 :body "looks good"}