                               :body
                               slurp)
                   actual (json/parse-string actual true)]
-              (compare-structured-response (map unkeywordize-values actual)
-                                           expected
-                                           version))))))))
+              (is (= (map unkeywordize-values actual) expected)))))))))
 
 (deftest-http-app facts-environment-paging
   [[_version endpoint] facts-endpoints

                              :body
                              slurp)
                  actual (json/parse-string actual true)]
              (compare-structured-response (map unkeywordize-values actual)
                                           expected
                                           version)))))

      (testing "unextracted field with alias"
        (doseq [[order expected] [["ASC" [f1 f2 f3 f4 f5]]

                              :body
                              slurp)
                  actual (json/parse-string actual true)]
              (is (= (map (comp :environment unkeywordize-values) actual)
                     (map :environment expected)))))))

      (testing "multiple fields"
        (doseq [[[name-order certname-order] expected] [[["DESC" "ASC"]  [f2 f4 f5 f1 f3]]
