Permalink
Fetching contributors…
Cannot retrieve contributors at this time
15 lines (13 sloc) 542 Bytes
(ns ring.middleware.multipart-params.test.byte-array
(:use clojure.test
[ring.util.io :only (string-input-stream)]
ring.middleware.multipart-params.byte-array))
(deftest test-byte-array-store
(let [store (byte-array-store)
result (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"))))