tasks.docker.clj

(deftask init
  "First step when building a Docker image. Optionally specifies a directory
  of resources that can be added to the image."
  [d dir DIR file "Directory to add."
   f from IMAGE str "Base image name."]
  (assert from "--from is required")
  (assert (or (nil? dir)
              (is-readable-directory? dir))
          "--dir must specify an existing directory")
  (with-pre-wrap fs
    (cond-> (-> fs
                (rm (user-files fs))
                (df/edit df/instruction :preamble :from from))
      dir (add-resource dir)
      true commit!)))