                               :body
                               slurp)
                   actual (json/parse-string actual true)]
-              (compare-structured-response (map unkeywordize-values actual)
-                                           expected
-                                           version)))))
+              (is (= (map unkeywordize-values actual) expected))))))
 
       (testing "unextracted field with alias"
         (doseq [[order expected] [["ASC" [f1 f2 f3 f4 f5]]

    (is (= (count expected-results) (count actual-result)))
    (is (= expected-results (set actual-result)))
    (is (= HttpURLConnection/HTTP_OK status))))

(defn compare-structured-response
  "compare maps that may have been stringified differently."
  [response expected version]
  (is (= response expected)))

(def common-subquery-tests
  (omap/ordered-map

                                       {:order_by
                                                 (vector-param method [{"field" "environment" "order" env-order}
                                                                      {"field" "name" "order" name-order}])})]
            (is (= (map unkeywordize-values (json/parse-string (slurp (:body actual)) true))
                   expected))))))))

(deftest-http-app fact-environment-queries
  [[_version endpoint] facts-endpoints
