anchor.diff:                         :label "Radiate"
                          :activate-callback
                            (lambda (pane &rest args)
  -                             nil))
  +                           (declare (ignore pane args))
  +                           nil))
                        (push-button
                          :label "No, Push Me")
                        (push-button
  
positive.code:                  :orientation :vertical
                   :current-color +black+
                   :value 0)
       (slider-v1  :slider
                   :min-value 0
                   :max-value 100
  
negative.code:                  :orientation :vertical
                   :current-color +black+
                   :value 0)
       #+nil
       (radar      (make-pane 'radar-pane :name 'radar))
       (push-btn   (lowering (:border-width 3 :background +Gray83+)
                     (horizontally ()
  