Clojurians Log v2

I feel like I’m getting close:

(let [bytes (into-array Byte/TYPE (job :artifacts))]
                        (with-open [zis (ZipInputStream. (ByteArrayInputStream. bytes))]
                          (loop [acc []]
                              (if-let [entry (.getNextEntry zis)]
                                (recur (conj acc {:size (.getSize entry)
                                                  :name (.getName entry)
                                                  :dir? (.isDirectory entry)}))
                                acc))))

What I thought would happen here is, (.getNextEntry zis) would yield the first jot of data, and zis would be pointing at the next jot. That doesn’t seem to be happening? There’s only a single artifact in every job, and I’m expecting quite a few more than that. But surely I’m not supposed to pass (rest zis) to recur