anchor.diff:      ;; Add the views to the box layout and to the window
       (gtk:gtk-box-pack-start box-layout (gtk-object active-buffer))
   
  -    (setf message-view (make-instance 'webkit:webkit-web-view))
  +    (setf message-view (make-web-view))
       (gtk:gtk-box-pack-end box-layout message-container :expand nil)
       (gtk:gtk-box-pack-start message-container message-view :expand t)
       (setf (gtk:gtk-widget-size-request message-container)
             (list -1 (message-buffer-height window)))
   
  -    (setf status-view (make-instance 'webkit:webkit-web-view))
  +    (setf status-view (make-web-view))
       (gtk:gtk-box-pack-end box-layout status-container :expand nil)
       (gtk:gtk-box-pack-start status-container status-view :expand t)
       (setf (gtk:gtk-widget-size-request status-container)
             (list -1 (status-buffer-height window)))
   
  -    (setf minibuffer-view (make-instance 'webkit:webkit-web-view))
  +    (setf minibuffer-view (make-web-view))
       (gtk:gtk-box-pack-end box-layout minibuffer-container :expand nil)
       (gtk:gtk-box-pack-start minibuffer-container minibuffer-view :expand t)
       (setf (gtk:gtk-widget-size-request minibuffer-container)
  
positive.code:       (webkit:webkit-cookie-manager-set-persistent-storage
         cookie-manager
         (expand-path (cookies-path buffer))
         :webkit-cookie-persistent-storage-text))
      (set-cookie-policy cookie-manager (default-cookie-policy buffer))
      context))
  
  (defmethod initialize-instance :after ((buffer gtk-buffer) &key)
  
negative.code: 
  (defmethod ffi-buffer-make ((buffer gtk-buffer))
    "Initialize BUFFER's GTK web view."
    (setf (gtk-object buffer) (make-web-view buffer))
    (ffi-buffer-enable-smooth-scrolling buffer t)
    (gobject:g-signal-connect
     (gtk-object buffer) "decide-policy"
  