 
 (defn make-request
   ([waiter-url path &
-    {:keys [async? body client cookies content-type disable-auth form-params headers
-            method multipart protocol query-params scheme trailers-fn verbose]
+    {:keys [async? body client cookies content-type disable-auth form-params follow-redirects? headers
+            method multipart protocol query-params scheme server-principal trailers-fn verbose]
      :or {async? false
           body nil
           cookies []
           disable-auth nil
+          follow-redirects? false
           headers {}
           method :get
           query-params {}

                         (str scheme "://"))
                       (strip-trailing-slash waiter-url)
                       path)
         request-headers (walk/stringify-keys (ensure-cid-in-headers headers))]
     (try
       (when verbose

                          client
                          (cond-> {:body body
                                   :fold-chunked-response? (not async?)
                                   :follow-redirects? follow-redirects?
                                   :headers request-headers
                                   :method method
                                   :query-string query-params
                                   :url request-url}
                            multipart (assoc :multipart multipart)
                            add-spnego-auth (assoc :auth (hu/spnego-authentication (URI. server-principal)))
                            form-params (assoc :form-params form-params)
                            (not (str/blank? content-type)) (assoc :content-type content-type)
                            cookies (assoc :cookies (map (fn [c] [(:name c) (:value c)]) cookies))
