Added tests for multipart byte-array and temp-file stores

@@ -0,0 +1,13 @@
+(ns ring.middleware.multipart-params.byte-array-test
+  (:use clojure.test
+        ring.util.test
+        ring.middleware.multipart-params.byte-array))
+
+(deftest test-byte-array-store
+  (let [result (byte-array-store
+                {:filename "foo.txt"
+                 :content-type "text/plain"
+                 :stream (string-input-stream "foo")})]
+    (is (= (:filename result) "foo.txt"))
+    (is (= (:content-type result) "text/plain"))
+    (is (= (String. (:bytes result)) "foo"))))

@@ -0,0 +1,15 @@
+(ns ring.middleware.multipart-params.temp-file-test
+  (:use clojure.test
+        ring.util.test
+        ring.middleware.multipart-params.temp-file))
+
+(deftest test-temp-file-store
+  (let [result (temp-file-store
+                {:filename "foo.txt"
+                 :content-type "text/plain"
+                 :stream (string-input-stream "foo")})]
+    (is (= (:filename result) "foo.txt"))
+    (is (= (:content-type result) "text/plain"))
+    (is (= (:size result) 3))
+    (is (instance? java.io.File (:tempfile result)))
+    (is (= (slurp (:tempfile result)) "foo"))))