           repo-infos (mapcat #(newest-voom-ver-by-spec % "" {}) full-projs)]
       (if (< 1 (count repo-infos))
         (do
-          (println "Multiple projects / locations match" (str \" dep \"\:))
-          (doseq [r repo-infos]
-            (prn r)))
+          (print "Multiple projects / locations match" (str \" dep \"\:))
+          (print-repo-infos repo-infos))
         (box-repo-add (first repo-infos))))))
 
 ;; === lein entrypoint ===

(ns leiningen.voom
  (:require [clojure.java.shell :as shell]
            [clojure.string :as s]
            [clojure.pprint :refer [pprint]]
            [clojure.java.io :as io]
            [leiningen.core.project :as project]
            [leiningen.core.main :as lmain]

                 :branch found-branch}))
            (partition 2 1 (concat commits [:end]))))))

(defn print-repo-infos
  [repo-infos]
  (->> repo-infos
       (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 :proj :ver :branch :path :ctime :sha]))
  (newline))

(defn fresh-version [[prj ver :as dep]]
  (let [voom-meta (:voom (meta dep))
        ver-spec (or (:version voom-meta)
