capi:editor-pane?

Hi,

I seem to on the roll today :-)

I suspect the editor-pane should be updated automatically with (setf 
(capi:editor-pane-text ... ? Works with multi-line-text-input-pane, for 
example. How to force this one to update? Updates only after one clicks 
on the editor pane.


(capi:define-interface test-interface2()
   ()
   (:panes
    (rules capi:list-panel
           :items '("1" "2" "3")
           :selection-callback #'(lambda(item interface)
                                   (update-rule-display1 interface)))
    (rule-display capi:editor-pane
                  :text ""
                  :buffer-name (string (gentemp)))))

(defun update-rule-display1(interface)
   (with-slots (rules rule-display) interface
     (setf (capi:editor-pane-text rule-display) 
(capi:choice-selected-item rules))))