                           client
                           (cond-> {:body body
                                    :fold-chunked-response? (not async?)
-                                   :follow-redirects? false
+                                   :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. request-url)))
+                            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))

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


(defn make-request
  ([waiter-url path &
    {: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 {}
