             [clj-http.client :as h]
             [clojure.string :as str]
             [cmr.common.util :as u]))
+
+(def PORT 3123)
 
 (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 3123 routes-fn true false) nil)]
    (try
      (testing "A large body is compressed"
        (assert-compressed-response (get-uri "/long" "gzip") long-body))

    ;; 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:" PORT path)
           {:headers {"Accept-encoding" accept-encoding}})))

(defn assert-compressed-response
