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

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

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

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

      (testing "works on value"
        (doseq [[order expected] [["ASC" [f1 f3]]
