     (when body
       (.setEntity request body))
     (.execute client request
-              (future-callback client result opts callback))
+              (future-callback client result request-opts callback))
     result))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

  [opts :- common/UserRequestOptions]
  (select-keys opts [:ssl-context :ssl-ca-cert :ssl-cert :ssl-key]))

(schema/defn create-default-client :- common/Client
  [opts :- common/ClientOptions]
  (let [configured-opts (configure-ssl opts)

(schema/defn future-callback
  [client :- common/Client
   result :- common/ResponsePromise
   opts :- common/RequestOptions
   callback :- common/ResponseCallbackFn]
  (reify FutureCallback
    (completed [this http-response]
