anchor.diff:          pattern-specified-p
           appender-specified-p
           force-add
  -        clear-levels clear-appenders)
  +        clear-levels clear-appenders
  +        remove)
       (declare (type (or null stream) stream))
       (cond ((logger-p (car args))
              (setq logger (pop args)))
  
positive.code: * (LOG:CONFIG :WARN :CLEAR) -- Changes root logger level to warnings,
    and unset child logger levels.
  
  * (LOG:CONFIG '(PACKAGE) :OWN :DEBUG :DAILY \"mypackage.log\")
  
    Configures the logger PACKAGE with debug log level, logging into
    the file \"mypackage.log\" which will be rolled over daily;
    makes logger non-additive so messages will not be propagated to
    logger parents. (To see them on console, remove the :OWN flag, or
    add :CONSOLE to the command)
  
negative.code:                           ((or this-console-appender tricky-console-appender)
                             (eq (appender-stream a) global-stream))))
                        appenders)
            (format t "~%~@<Warning: No appenders can reach current ~9I~_~<~A: ~:_~A~:>~:>~%"
                    (list '*terminal-io* global-stream)))))
      (values)))
  
  ;; do default configuration
  