anchor.diff:     (frames :initform (make-hash-table))
      (application-frame-recording-p :initform nil))
     (:panes
  -   (options-pane
  -    (vertically ()
  +   (category-test-pane
  +    (horizontally (:equalize-height t)
         (1/8 (labelling (:label "Category")
                (clim-extensions:lowering ()
                  (scrolling (:scroll-bar :vertical)
  
positive.code:           "side-by-side view with the renderer output"))))
     (backend-pane
      (labelling (:label "Backend")
        (make-pane 'application-pane
                   :name 'backend-output
                   :min-width *width*
                   :min-height *height*
                   :display-time nil
                   :display-function #'display-backend-output
                   :end-of-line-action :wrap
                   :end-of-page-action :wrap)))
     (render-pane
      (labelling (:label "Render")
        (make-pane 'application-pane
                   :name 'render-output
                   :min-width *width*
                   :min-height *height*
                   :display-time nil
                   :display-function #'display-render-output
                   :end-of-line-action :wrap
                   :end-of-page-action :wrap)))
     (description-pane
      (spacing (:thickness 3)
        (clim-extensions:lowering ()
  
negative.code:                             :mode :exclusive
                              :name-key #'drawing-test-name
                              :items nil
                              :value-changed-callback #'%update-selection)))))))
     (options-pane
      (vertically ()
        (horizontally ()
          (labelling (:label "Recording")
            (clim:with-radio-box (:orientation :vertical
  