 (def default-options
   {:name     "request"
    :appender (ConsoleAppender. nil ConsoleAppender/SYSTEM_OUT)
-   :layout   commons-logging-format-layout
-   :priority Priority/INFO})
+   :layout   commons-logging-format-layout})
 
 (defn- mk-logger
   [{name :name appender :appender layout :layout :as opts}]
   (let [^Logger logger (Logger/getLogger name)]
+    (.setLevel logger Level/INFO)
     (.setLayout appender layout)
     (.addAppender logger appender)
     logger))

    SimpleDateFormat]
   [org.apache.log4j
    ConsoleAppender
    Logger
    Layout
    Priority
    SimpleLayout]
   [org.apache.log4j.spi
    LoggingEvent]))

           (next-dn evt val))

         :finalize
         (fn [_] (.info logger @state))))))
