(defmethod handle ((cat log-category) message level) (if (appenders cat) ;; if we have any appenders send them the message (dolist (appender (appenders cat)) (append-message cat appender message level)) ;; send the message to our ancestors (dolist (ancestor (ancestors cat)) (handle ancestor message level))))Source Context