Automatically generate MD5 of payload in create-blob function.

2010-03-12 14:11:08 -08:00 · 2010-03-12 14:11:08 -08:00 · dba85d84dd
parent 40447696c7
commit dba85d84dd
1 changed files with 2 additions and 1 deletions
--- a/blobstore/src/main/clojure/org/jclouds/blobstore.clj
+++ b/blobstore/src/main/clojure/org/jclouds/blobstore.clj
@ -242,7 +242,8 @@ container, name, string -> etag
  ([blobstore container-name name data]
     (put-blob blobstore container-name
               (doto (.newBlob blobstore name)
-                 (.setPayload data)))))
+                 (.setPayload data)
+                 (.generateMD5)))))

 (defmulti #^{:arglists '[[container-name name target]
                         [blobstore container-name name target]]}