     (->> (drc/tags token repository-name)
          :tags)))
 
-(defn dockerhub-ports
-  [repository-name repository-tag dockeruser-name]
-  (let [user (dockeruser-by-username dockeruser-name)
+(defn dockeruser-ports
+  [dockeruser-id repository-name repository-tag]
+  (let [user (dockeruser dockeruser-id)
         token (:token (dac/token user repository-name))]
     (-> (drc/manifest token repository-name repository-tag)
         (rmi/->repository-config)


(defn public-tags
  [repository-name]
  (let [token (:token (dac/token nil repository-name))]
    (->> (drc/tags token repository-name)
         :tags)))

;;; Registry API


      (rc/tags repository-name)
      :tags))

(defn registry-ports
  [registry-id repository-name repository-tag]
  (-> (registry registry-id)
      (rc/manifest repository-name repository-tag)
      (rmi/->repository-config)
      :config
