Less Storm logs in your tests

lesslogs.clj

(import '(ch.qos.logback.classic Level Logger)
         (org.slf4j LoggerFactory))

(defmacro with-storm-log-level
  [level & body]
  `(let [slogger# (LoggerFactory/getLogger "root")
         zlogger# (LoggerFactory/getLogger
                   "org.apache.zookeeper.server.NIOServerCnxn")
         slevel# (.getLevel slogger#)
         zlevel# (.getLevel zlogger#)]
     (.setLevel slogger# (case ~level
                           :debug Level/DEBUG
                           :info Level/INFO
                           :warn Level/WARN
                           :error Level/ERROR))
     (.setLevel zlogger# Level/ERROR)
     (try
       ~@body
       (finally
         (.setLevel slogger# slevel#)
         (.setLevel zlogger# zlevel#)))))