Create a gist now

Instantly share code, notes, and snippets.

(ns dh.immutant.logging
(:import (java.util.logging LogManager Level)))
;; can't bring myself to bother with the XML logging config in jboss
(def logger-levels
{"org.openid4java" :warn})
(let [lm (LogManager/getLogManager)]
(doseq [[logger-name level] logger-levels]
(.setLevel (.getLogger lm logger-name)
(Level/parse (.toUpperCase (name level))))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment