Remove unused DSL support functions

This commit is contained in:
Michael S. Klishin 2011-12-31 07:03:15 +04:00
parent b649c7977e
commit bb806d5c0f

View file

@ -18,18 +18,6 @@
(def ^:dynamic *chunk-size* (* 2 1024 1024))
(defn filename
[m ^String s]
(merge m { :filename s }))
(defn content-type
[m ^String s]
(merge m { :content-type s }))
(defn- exec
[{ :keys [input filename content-type] }]
)
;; ...