        (map (fn [info]
               (-> info
                   (dissoc :gitdir)
-                  (assoc :repo (-> (remotes (:gitdir info)) :origin :fetch))
                   (update-in [:sha] #(subs (str % "--------") 0 7)))))
        (sort-by :ctime)
        (print-table [:repo :path :proj :version :branch :ctime :sha]))
   (newline))
 
-(defn fresh-version [[prj ver :as dep]]
+(defn fresh-version [repo-dbs [prj ver :as dep]]
   (if-let [voom-meta (-> dep meta :voom)]
     (let [voom-meta (merge {:allow-snaps false, :freshen true} voom-meta)]
       (if (not (:freshen voom-meta))
         dep
-        (let [groups (->> (newest-voom-ver-by-spec prj voom-meta)
+        (let [groups (->> (newest-voom-ver-by-spec repo-dbs prj voom-meta)
                           (map #(assoc % :voom-ver (format-voom-ver %)))
                           (group-by :voom-ver))]
           (case (count groups)

(defn box-add
  "Add a lein project to this box"
  [proj & adeps]
  (let [deps (fold-args-as-meta (map edn/read-string adeps))]
    (ensure-deps-repos deps)
    (doseq [dep deps
            :let [repo-infos (newest-voom-ver-by-spec dep (-> dep meta :voom))]]
      (println "box adding" (str (-> dep meta :voom)) dep)
      (case (count repo-infos)
        0 (throw (ex-info "Could not find matching projects" {:dep dep}))

          input-str
          replacement-map))

(declare all-repo-dbs)
(defn freshen
  "Modify dependency versions in this project.clj based on what's available in $VOOM_REPOS

