luciano/monger
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Use unqualified function names for what we :use

Browse source
This commit is contained in:
Michael S. Klishin 2011-12-31 15:02:21 +04:00
parent 7da99d98a3
commit 7eec647a97
1 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
test/monger/test/gridfs.clj
View file

@ -27,7 +27,7 @@
(deftest test-storing-files-to-gridfs-using-relative-fs-paths (deftest test-storing-files-to-gridfs-using-relative-fs-paths
(let [input "./test/resources/mongo/js/mapfun1.js"] (let [input "./test/resources/mongo/js/mapfun1.js"]
(is (= 0 (count (gridfs/all-files)))) (is (= 0 (count (gridfs/all-files))))
(gridfs/store (gridfs/make-input-file input) (store (make-input-file input)
(.setFilename "monger.test.gridfs.file1") (.setFilename "monger.test.gridfs.file1")
(.setContentType "application/octet-stream")) (.setContentType "application/octet-stream"))
(is (= 1 (count (gridfs/all-files)))))) (is (= 1 (count (gridfs/all-files))))))
@ -36,7 +36,7 @@
(deftest test-storing-files-to-gridfs-using-file-instances (deftest test-storing-files-to-gridfs-using-file-instances
(let [input (io/as-file "./test/resources/mongo/js/mapfun1.js")] (let [input (io/as-file "./test/resources/mongo/js/mapfun1.js")]
(is (= 0 (count (gridfs/all-files)))) (is (= 0 (count (gridfs/all-files))))
(gridfs/store (gridfs/make-input-file input) (store (make-input-file input)
(.setFilename "monger.test.gridfs.file2") (.setFilename "monger.test.gridfs.file2")
(.setContentType "application/octet-stream")) (.setContentType "application/octet-stream"))
(is (= 1 (count (gridfs/all-files)))))) (is (= 1 (count (gridfs/all-files))))))