   (let [voom-meta (:voom (meta dep))
         ver-spec (or (:version voom-meta)
                      (re-find #"^[^.]+." ver))
-        groups (->> (newest-voom-ver-by-spec prj ver-spec voom-meta)
+        groups (->> (newest-voom-ver-by-spec prj (assoc voom-meta :version ver-spec))
                     (map #(assoc % :voom-ver (format-voom-ver
                                               (update-in % [:sha] subs 0 7))))
                     (group-by :voom-ver))]


;; TODO: Consider revamping these entry points. Separate top-level
;; lein commands?  Separate lein plugins?
(def sub-commands
  {"build-deps" build-deps
   "freshen" freshen
   "retag" retag
   "new-task" nope})

(defn ^:no-project-needed voom
  "Usage:
    lein voom [flags] [lein command ...]

          replacement-map))

(defn freshen [project & args]
  (p-repos (fn [p] (fetch-all [p]) (tag-repo-projects p)))
  (let [prj-file-name (str (:root project) "/project.clj")
        old-deps (:dependencies project)
        desired-new-deps (doall (map #(fresh-version %) old-deps))]
