bad method mapping for count-blobs

This commit is contained in:
Adrian Cole 2010-11-25 15:18:16 +01:00
parent c77979c311
commit f4870b547c
2 changed files with 2 additions and 1 deletions

View File

@ -299,7 +299,7 @@ Options can also be specified for extension modules
([container-name] ([container-name]
(count-blobs container-name *blobstore*)) (count-blobs container-name *blobstore*))
([container-name blobstore] ([container-name blobstore]
(.countBlob blobstore container-name))) (.countBlobs blobstore container-name)))
(defn blobs (defn blobs
"List the blobs in a container: "List the blobs in a container:

View File

@ -70,6 +70,7 @@
(is (= 1 (count (list-container "container" :max-results 1)))) (is (= 1 (count (list-container "container" :max-results 1))))
(create-directory "container" "dir") (create-directory "container" "dir")
(is (upload-blob "container" "dir/blob2" "blob2")) (is (upload-blob "container" "dir/blob2" "blob2"))
(is (= 3 (count-blobs "container")))
(is (= 3 (count (list-container "container")))) (is (= 3 (count (list-container "container"))))
(is (= 4 (count (list-container "container" :recursive true)))) (is (= 4 (count (list-container "container" :recursive true))))
(is (= 3 (count (list-container "container" :with-details true)))) (is (= 3 (count (list-container "container" :with-details true))))