     :timeout-millis
     :timezone})
 
-(defn- request-options
+(defn request-options
   "Creates a Request Options object (to pass to a Request or a
   Session) out of the given options map. See `valid-request-options`
   for supported keywords."

                                              ValueType/XS_STRING (str vval))
                             acc)
                           (doto request-factory (.setOptions ro))
                           options)]
    (cond (= :raw types) (.submitRequest session request)
          :else (convert-types (.submitRequest session request) types))))


  [java-json]
  (json/read-str (.toString (.asJsonNode java-json))))

(defn xdm-var->str
  "Returns a String representation of the given XDM variable"
  [xdm-var]
  (hash-map (.toString (.getName xdm-var))
            (.toString (.getValue xdm-var))))

(def types
  "Default mapping from MarkLogic XCC types (e.g. those that might be
  returned in a query's result set) to Clojure functions intended to
