anchor.diff:    ;; Half-baked attempt to be compatible with Lispworks. ??? -moore
     ;; Inherited from basic-pane with different defaults.
     ((foreground  :initform +black+)
  -   (background  :initform +white+)))
  +   (background  :initform +white+)
  +   ))
   
   
   ;; Where is this standard-gadget from? --GB
  
positive.code: (defclass check-box-pane (check-box rack-layout-mixin sheet-multiple-child-mixin basic-pane)
    ()
    (:default-initargs
        :background *3d-normal-color*))
  
  (defmethod initialize-instance :after ((pane check-box-pane)
                                         &key choices current-selection orientation &allow-other-keys)
  
negative.code: (defclass radio-box-pane (radio-box rack-layout-mixin sheet-multiple-child-mixin basic-pane)
    ()
    (:default-initargs
     :background *3d-normal-color*))
  
  (defmethod initialize-instance :after ((pane radio-box-pane)
                                         &key choices current-selection orientation &allow-other-keys)
  