   "Prints the object more briefly, with limits on level and length."
   [object]
   (binding [*print-level* 4
-                     *print-length* 5] (pretty-print object)))
+            *print-length* 5] (pretty-print object)))
 


(defn response
  "Construct Ring response for success or other status."
  ([body] (response HttpServletResponse/SC_OK body))
  ([status body] {:status status :body body}))

(defn pretty-print
  "Pretty-prints the supplied object to a returned string."

    (java.util UUID)
    (javax.servlet.http HttpServletResponse))
  (:require
    [ring.util.response :as r]
    [clojure.pprint :as pprint]))

(defn new-uuid
