anchor.diff:        (inspect-object (package-name object) pane))
       (inspector-table-row
         (princ "Nicknames:" pane)
  -      (dolist (nick (package-nicknames object))
  -        (inspect-object nick pane)))
  +      (inspect-vertical-list (package-nicknames object) pane))
       (inspector-table-row
         (princ "Used by:")
  -      ;; FIXME: This should use some sort of list formatting, so that
  -      ;; it can obey conventions about *print-length* and reuse code
  -      ;; for modifying it. To support this, list printing should
  -      ;; support delimiterless, one-item-per-line display.
  -      (dolist (used-by (package-used-by-list object))
  -	(fresh-line pane)
  -	(inspect-object used-by pane)))
  +      (inspect-vertical-list (package-used-by-list object) pane))
       (inspector-table-row
         (princ "Uses:")
  -      (dolist (uses (package-use-list object))
  -	(fresh-line pane)
  -	(inspect-object uses pane)))))
  +      (inspect-vertical-list (package-use-list object) pane))))
   
   (defmethod inspect-object ((object vector) pane)
     (with-output-as-presentation
  
positive.code:      (when (clim-mop:class-direct-superclasses class)
         (inspector-table-row
  	(princ "Superclasses" pane)
  	(dolist (superclass (clim-mop:class-direct-superclasses class))
  	  (inspect-object superclass pane)
  	  (terpri pane))))
       (when (clim-mop:class-direct-subclasses class)
         (inspector-table-row
  	(princ "Subclasses" pane)
  	(dolist (subclass (clim-mop:class-direct-subclasses class))
  	  (inspect-object subclass pane)
  	  (terpri pane))))
       (loop for slot in (reverse (clim-mop:class-slots class))
  	   do (let ((slot-name (clim-mop:slot-definition-name slot)))
  		(inspector-table-row
  
negative.code: (defmethod inspect-object-briefly ((object symbol) pane)
    (with-output-as-presentation
        (pane object (presentation-type-of object))
      (with-text-family (pane :fix)
        (prin1 object))))
  
  (defmethod inspect-object ((object symbol) pane)
    (inspector-table
  