 (defn format-voom-ver
   [gver]
   (let [{:keys [ver ctime sha]} gver]
+    (assert ver   (str "format-voom-ver requires :ver " (pr-str gver)))
+    (assert ctime (str "format-voom-ver requires :ctime " (pr-str gver)))
+    (assert sha   (str "format-voom-ver requires :sha " (pr-str gver)))
     (str (s/replace ver #"-SNAPSHOT" "")
          "-" (formatted-timestamp timestamp-fmt ctime) "-g" sha)))
 

     (do (println "\nMultiple bump resolutions for:"
                  prj (pr-str ver-spec) (pr-str voom-meta))
         (doseq [[voom-ver group] groups]
           (prn voom-ver (map #(select-keys % [:gitdir :branch :path :ctime]) group)))
         dep))))

(defn rewrite-project-file [input-str replacement-map]

                    (when (not= old-ver new-ver)
                      (str " -> " new-ver)))))
    (if (= old-deps desired-new-deps)
      (println "No versions bumped.")
      (let [replacement-map (into {} (map #(when (not= %1 %2) [%1 %2])
                                          old-deps desired-new-deps))
            tmp-file (File/createTempFile
