From bb806d5c0f7e160d94ff406f4426cfc2c2fb210b Mon Sep 17 00:00:00 2001
From: "Michael S. Klishin" <michael@novemberain.com>
Date: Sat, 31 Dec 2011 07:03:15 +0400
Subject: [PATCH] Remove unused DSL support functions

---
 src/monger/gridfs.clj | 12 ------------
 1 file changed, 12 deletions(-)

diff --git a/src/monger/gridfs.clj b/src/monger/gridfs.clj
index 75fcd06..991ae44 100644
--- a/src/monger/gridfs.clj
+++ b/src/monger/gridfs.clj
@@ -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] }]
-  )
-
 ;; ...