(defn save-rec! [params]
  (s3/put-object cred "rod-bucket" (:filename params) (:bytes params)))

; appengine-magic.multipart-params/wrap-multipart-params works just like
; the Ring equivalent, except file upload parameters become maps with a :bytes key
; (instead of :tempfile). This key contains a byte array with the upload data.