     ;; We remove all middleware so we can get the raw input stream body back
     [clj-http.client/wrap-url
      clj-http.client/wrap-method]
-    (h/get (str "http://localhost:3123" path)
+    (h/get (str "http://localhost:" PORT path)
            {:headers {"Accept-encoding" accept-encoding}})))
 
 (defn assert-compressed-response

            [clj-http.client :as h]
            [clojure.string :as str]
            [cmr.common.util :as u]))

(def long-body
  "A body long enough that it should be compressed"

  (is (= expected-body (-> response :body slurp))))

(deftest test-gzip-compression
  (let [server (l/start (s/create-web-server PORT routes-fn true false) nil)]
    (try
      (testing "A large body is compressed"
        (assert-compressed-response (get-uri "/long" "gzip") long-body))
