anchor.diff:  		    (clim:with-text-family (pane :fix)
   		      (format t "~A" (condition-extra (condition-info pane))))))))
       (fresh-line)
  -    
  +
       (with-text-family (pane :sans-serif)
         (bold (pane) (format t "Restarts:")))
       (fresh-line)
  
positive.code: 
  ;;; This is the beginning of a Common Lisp debugger implemented in
  ;;; McCLIM. It uses the portable debugger interface developed for the
  ;;; Slime project, and the graphical layout is also heavily inspired
  
negative.code: 
  (defun make-debugger-pane ()
    (with-look-and-feel-realization ((frame-manager *application-frame*)
  				   *application-frame*)
      (make-pane 'debugger-pane
  	       :condition-info (the-condition *application-frame*)
  	       :display-function #'display-debugger
  	       :end-of-line-action :allow
  