io_archive__archive"></label>
                        <pre class="source"><code class="clojure">(defn archive
  ([archive root]
   (let [ach (open archive)
         res (protocol.archive/-archive ach
                                        root
                                        (fs/select root {:exclude [fs/directory?]}))]
     (.close ach)
     res))
  ([archive root inputs]
   (protocol.archive/-archive (open archive) root inputs)))</code></pre>
                    </div>
                </div>
    