(defn write-properties
"Write properties to file-able."
{:tag Properties}
([m file-able] (write-properties m file-able nil))
([m file-able comments]
(with-open [^FileOutputStream f (FileOutputStream. (file file-able))]
(doto (as-properties m)
(.store f ^String comments)))))
Comments top
No comments for write-properties. Log in to add a comment.