anchor.diff:  (defmethod compose-space ((pane scroller-pane))
     (with-slots (viewport) pane
       (if viewport
  -	(let ((req (compute-and-set-space viewport)))
  +	(let ((req (compose-space viewport)))
   	  (incf (space-requirement-width req) 10)
   	  (incf (space-requirement-min-width req) 10)
   	  (incf (space-requirement-max-width req) 10)
  
positive.code:   (setf (pane-display-time title) t))
  
  
  ;; POINTER DOCUMENTATION PANE
  
  (defclass pointer-documentation-pane (clim-stream-pane)
    ())
  
  
  ;; CONSTRUCTORS
  
  (defun make-clim-stream-pane (&rest options 
  				    &key (type 'clim-stream-pane)
  
negative.code:     (when min-height-p (setf sr-min-height min-height))
      (when max-height-p (setf sr-max-height max-height)))
    (if resize-frame
        ;; we didn't find the :resize-frame option in define-application-frame
        (layout-frame (pane-frame pane))
        (note-space-requirements-changed (sheet-parent pane) pane)))
  
  ;;; SINGLE-CHILD-COMPOSITE PANE
  
  