anchor.diff:     ;; ACTIVATE-GADGET after creating a gadget?
      ;;
      ;; I think, T is correct here --GB
  -   (active-p            :initform t
  +
  +   (active-p            :initform t :initarg :active
                           :reader gadget-active-p)
      ;;
      ;; I am not so lucky with the armed slot in GADGET --GB
  
positive.code: ;; things in their list pane. Instead of :exclusive and :nonexclusive modes,
  ;; they call them :one-of and :some-of. I've supported these aliases for
  ;; compatibility. They also state the default mode is :some-of, which
  ;; contradicts the CLIM 2.0 Spec. Our default does not.
  
  (define-abstract-pane-mapping 'list-pane 'generic-list-pane)
  
  
negative.code:   ((mode        :initarg :mode
                  :initform :exclusive
                  :reader list-pane-mode
                  :type (member :one-of :some-of :exclusive :nonexclusive))
     (items       :initarg :items
                  :initform nil
                  :reader list-pane-items
  