anchor.diff:      (setf (lem-pane-bold-font lem-pane) bold-font)
       (setf (lem-pane-string-extent lem-pane)
             (multiple-value-list (gp:get-string-extent lem-pane "a" normal-font)))))
  -
  -(defmethod capi:interface-keys-style ((lem-pane lem-pane)) :emacs)
  -
  -(defun resize-callback (lem-pane &rest args)
  -  (declare (ignore args))
  -  (lem:send-event :resize)
  -  (reinitialize-pixmap lem-pane))
   
   (defun reinitialize-pixmap (lem-pane)
     (capi:apply-in-pane-process-wait-single
  
positive.code:   (:add-use-defaults t)
    (:use :cl :lem-capi.util)
    (:export
     :reinitialize-pixmap
     :lem-pane
     :lem-pane-width
  
negative.code:     :accessor lem-pane-string-extent)
     (pixmap
      :initform nil
      :accessor lem-pane-pixmap)
     (resized
      :initform nil
      :accessor lem-pane-resized))
    (:default-initargs
     :foreground :black
     :background :white
  