anchor.diff:            ((:twoline :two-line :2line) (setq oneline nil twoline t))
             ((:oneline :one-line :1line) (setq oneline t twoline nil))
             (:console (setq console t))
  +          (:thread (setq thread t))
  +          (:ndc (setq ndc t))
  +          (:pretty (setq pretty t nopretty nil))
  +          (:nopretty (setq nopretty t pretty nil))
             (:this-console (setq this-console t
                                  console t))
             (:watch (setq watch t))
  
positive.code:  :FILE or      | Include file name into default pattern, :FILE2 uses alternate
   :FILE2        | position for the file (in front of the package).
   :NOFILE       | :NOFILE removes the file
  ---------------|---------------------------------------------------------------
   :PROPERTIES   | Configure with PROPERTY-CONFIGURATOR by parsing specified     
   FILE          | properties file                                               
  
negative.code:       ;; This is special adhoc case of configuring the LOG4CL-iMPL:SELF.  We need
        ;; special processing, because we want self-logging to survive
        ;; the (clear-logging-configuration), which is done doing tests
        (let ((config
                (cons
                 :own
                 ;; we don't remember these
                 (remove-if (lambda (x)
                              (member x '(:own :self :clear :all :twoline :two-line
                                          :2line :oneline :one-line :1line
                                          :file :file2 :nofile
                                          :time :notime
                                          :pretty :nopretty
                                          :thread :ndc)))
                            orig-args))))
          ;; If anything non-default was specified, remember
          (let ((lst '(:sane :daily :console :this-console))) 
            (if (null (intersection lst config))
  