         nnproj (with-meta nproj nmeta)]
     nnproj))
 
-(defn ver-parse
+(defn ^:info-subtask ver-parse
   "Parses jar-path-like-string or artifact-version-string to find ctime and sha.
    Can handle cases in the range of:
      1.2.3-20120219223112-abc123f

            f)]
    (apply adj-path d elems)))

(defn ^File find-box
  "Locates voom-box root starting from current working directory."
  []
  (loop [^File path (or *pwd* (-> "user.dir" System/getProperty File.))]


(defn install-versioned-artifact
  [proot]
  ;; TODO: voom build-deps first, then wrap install:
  (let [install-cmd ["lein" "voom" "wrap" "install" :dir proot]
        _ (apply println "install-versioned-artifact:" install-cmd)
        rtn (apply sh install-cmd)]
    (when-not (zero? (:exit rtn))
      (throw (ex-info "lein voom install error" (assoc rtn :cmd install-cmd))))
    rtn))
