anchor.diff:     (lambda ()
        (multiple-value-bind (char-width char-height)
            (lem-pane-char-size lem-pane)
  -       (push (lambda (lem-pane)
  -               (if color
  -                   (gp:draw-rectangle lem-pane
  -                                      (* x char-width)
  -                                      (* y char-height)
  -                                      (* width char-width)
  -                                      (* height char-height)
  -                                      :filled t
  -                                      :foreground color)
  -                   (gp:clear-rectangle lem-pane
  -                                       (* x char-width)
  -                                       (* y char-height)
  -                                       (* width char-width)
  -                                       (* height char-height))))
  -             (lem-pane-queue lem-pane))))))
  +       (let ((x (* x char-width))
  +             (y (* y char-height))
  +             (w (* width char-width))
  +             (h (* height char-height)))
  +         (if color
  +             (gp:draw-rectangle (lem-pane-pixmap lem-pane)
  +                                x y w h
  +                                :filled t
  +                                :foreground color)
  +             (gp:clear-rectangle (lem-pane-pixmap lem-pane)
  +                                 x y w h)))))))
   
   (defun clear (lem-pane)
     (capi:apply-in-pane-process-wait-single
      lem-pane
      nil
      (lambda ()
  -     (push (lambda (lem-pane)
  -             (gp:clear-graphics-port lem-pane))
  -           (lem-pane-queue lem-pane)))))
  +     (gp:clear-graphics-port (lem-pane-pixmap lem-pane)))))
   
   (defun change-foreground (lem-pane color)
     (alexandria:when-let ((color (convert-color color nil)))
  
positive.code:    lem-pane
     nil
     (lambda ()
       (dolist (fn (nreverse (lem-pane-queue lem-pane)))
         (funcall fn (lem-pane-pixmap lem-pane)))
       (setf (lem-pane-queue lem-pane) nil)
       (gp:copy-pixels lem-pane
                       (lem-pane-pixmap lem-pane)
                       0 0
                       (capi:simple-pane-visible-width lem-pane)
                       (capi:simple-pane-visible-height lem-pane)
  
negative.code: (defun resize-callback (lem-pane &rest args)
    (declare (ignore args))
    (lem:send-event :resize)
    (reinitialize-pixmap lem-pane))
  
  (defun reinitialize-pixmap (lem-pane)
  