                    api/list-groups
                    result)]
     (is (= ["org.bar" "org.foo"]
-           (sort (map :name groups))))))
+           (sort (map t/thing->name groups))))))
 
 (deftest list-artifacts-test
   (let [g       (t/->Group "org.foo")

                      (api/list-platforms p)
                      result)]
    (is (= ["clj" "cljclr" "cljs"]
           (sort (map :name platforms))))))

(deftest list-ns-test
  (let [v   (-> (t/->Group "org.foo")

                     (api/list-versions a)
                     result)]
    (is (= ["0.1.0" "0.1.0-SNAPSHOT" "1.0.0" "1.0.1" "1.1.0"]
           (sort (mapv t/thing->name versions))))))

(deftest list-platform-test
  (let [p (-> (t/->Group "org.foo")
