clojure append to zip file

create-zip-archive.clj

(ns create-zip-archive
  (:import (java.net URI)
           (java.nio.charset StandardCharsets)
           (java.nio.file FileSystem FileSystems Files Paths StandardOpenOption)))

(let [path (Paths/get "test.zip" (make-array String 0))
      uri (URI/create (str "jar:" (.toUri path)))]
  (with-open [fs (FileSystems/newFileSystem uri {"create" "true"})]
    (let [nf (FileSystem/.getPath fs "new.txt" (make-array String 0))]
      (with-open [writer (Files/newBufferedWriter nf, StandardCharsets/UTF_8, (into-array [StandardOpenOption/CREATE]))]
        (.write writer "hello")))))