                      (api/list-versions a)
                      result)]
     (is (= ["0.1.0" "0.1.0-SNAPSHOT" "1.0.0" "1.0.1" "1.1.0"]
-           (sort (mapv :name versions))))))
+           (sort (mapv t/thing->name versions))))))
 
 (deftest list-platform-test
   (let [p (-> (t/->Group "org.foo")

                (api/list-namespaces v)
                result)]
    (is (= ["a.core" "a.impl.clj"]
           (sort (mapv :name nss))))))

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

                    (api/list-artifacts g)
                    result)]
    (is (= ["a" "b"]
           (sort (mapv t/thing->name members))))))

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