                    (str "-"
                     (.format (SimpleDateFormat. "yyyy-MM-dd-hh-mm") (Date.)))
                    ""))
-    (if (= "" (or (get version :rest) ""))
-      (update version :bugfix #(inc (or % 0)))
-      (assoc version :rest ""))))
+    (-> (if (= "" (or (get version :rest) ""))
+          (update version :bugfix #(inc (or % 0)))
+          (assoc version :rest ""))
+        (assoc :snapshot? true))))
+
 
 
 (defn ^:private project-version

      proj-dir)))




(defn ^:private bump-project-version


(defn ^:private version->string
  [version]
  (format "%s.%s.%s%s%s" (:major version) (:minor version) (:bugfix version)
          (:rest version) (if (:snapshot? version) "-SNAPSHOT" "")))


(defn ^:private write-version-to-project
