new files are unpublished by default

This commit is contained in:
Gered 2013-05-26 20:02:18 -04:00
parent 8bd20aa40b
commit 7ea2f9ab01

View file

@ -56,7 +56,7 @@
:filename filename
:path p
:last_modified_at (get-timestamp)
:published true})]
:published false})]
(couch/put-attachment doc file :filename filename :mime-type content-type)))))
(defn update-file [id file content-type]