   [x & opts]
   (make-input-stream x (when opts (apply hash-map opts))))
 
-(defn ^OutputStream output-stream
+#_(defn ^OutputStream output-stream
   "Attempts to coerce its argument into an open java.io.OutputStream.
    Default implementations always return a java.io.BufferedOutputStream.
 

  (as-url [u] (.toURL u))
  (as-file [u] (as-file (as-url u))))

(defprotocol ^{:added "1.2"} IOFactory
  "Factory functions that create ready-to-use, buffered versions of
   the various Java I/O stream types, on top of anything that can
   be unequivocally converted to the requested kind of stream.

  ([parent child & more]
    (reduce file (file parent child) more)))

#_(defn delete-file
  "Delete file f. Raise an exception if it fails unless silently is true."
  {:added "1.2"}
  [f & [silently]]
