anchor.diff:                        :documentation "Directory in which the WebKitGTK
   data-manager will store the data separately for each buffer.")
      (gtk-extensions-path (make-instance 'gtk-extensions-data-path)
  -                        :documentation "Directory to store the WebKit-specific extensions in."))
  +                        :documentation "Directory to store the WebKit-specific extensions in.")
  +   (loading-webkit-history-p nil
  +                             :type boolean
  +                             :export nil
  +                             :documentation "Internal hack, do not use me!"))
     (:export-class-name-p t)
     (:export-accessor-names-p t)
     (:accessor-name-transformer (class*:make-name-transformer name)))
  
positive.code:     ;; TODO: WebKitGTK sometimes (when?) triggers "load-failed" when loading a
      ;; page from the webkit-history cache.  Upstream bug?  Anyways, we should
      ;; ignore these.
      (if *loading-webkit-history-p*
          (setf *loading-webkit-history-p* nil)
          (unless (member (slot-value buffer 'load-status) '(:finished :failed))
            (echo "Failed to load URL ~a in buffer ~a." failing-url (id buffer))
            (setf (slot-value buffer 'load-status) :failed)
  
negative.code:     (values history-list current-index)))
  
  (defmethod load-webkit-history-entry ((buffer gtk-buffer) history-entry)
    (setf (loading-webkit-history-p buffer) t)
    (webkit:webkit-web-view-go-to-back-forward-list-item
     (gtk-object buffer)
     (webkit-history-entry-gtk-object history-entry)))
  