anchor.diff:  WINDOW as the `last-active-window'."))
   
   (define-ffi-generic ffi-window-title (window)
  +  (:setter-p t)
     (:documentation "Return as a string the title of the window.
   It is the title that's often used by the window manager to decorate the window.
   Setf-able."))
  
positive.code:   (:documentation "Unbind the pannel BUFFER widget from WINDOW."))
  
  (define-ffi-generic ffi-window-panel-buffer-width (window buffer)
    (:documentation "Return the panel BUFFER width as a number.
  Setf-able."))
  (define-ffi-generic ffi-window-prompt-buffer-height (window)
    (:documentation "Return the WINDOW prompt buffer height as a number.
  Setf-able."))
  (define-ffi-generic ffi-window-status-buffer-height (window)
    (:documentation "Return the WINDOW status buffer height as a number.
  Setf-able."))
  (define-ffi-generic ffi-window-message-buffer-height (window)
    (:documentation "Return the WINDOW message buffer height as a number.
  Setf-able."))
  
  
negative.code:   (:method ((buffer t))
      (with-current-buffer buffer
        (peval (ps:chain document body style zoom))))
    (:setter-p t)
    (:documentation "Return the zoom level of the document.
  Setf-able."))
  (defmethod (setf ffi-buffer-zoom-level) (value (buffer buffer))
  