anchor.diff:          (let ((cookies-path (nfiles:expand (make-instance 'cookies-file :context-name name))))
             (webkit:webkit-cookie-manager-set-persistent-storage
              cookie-manager
  -           cookies-path
  +           (uiop:native-namestring cookies-path)
              :webkit-cookie-persistent-storage-text))
           (set-cookie-policy cookie-manager (default-cookie-policy *browser*)))
         (maphash
  
positive.code:            (lambda (context)
               (with-protect ("Error in signal thread: ~a" :condition)
                 (webkit:webkit-web-context-set-web-extensions-directory
                  context gtk-extensions-path)
                 (webkit:webkit-web-context-set-web-extensions-initialization-user-data
                  context (glib:g-variant-new-string
                           (flet ((describe-extension (extension &key privileged-p)
  
negative.code:   (:accessor-name-transformer (class*:make-name-transformer name)))
  
  (defmethod initialize-instance :after ((file data-manager-file) &key)
    (setf (slot-value file 'nfiles:base-path)
          (pathname (str:concat (context-name file) "-web-context"))))
  
  (defmethod nfiles:resolve ((profile nosave-profile) (file data-manager-file))
    "We shouldn't store any `data-manager' data for `nosave-profile'."
    #p"")
  
  (define-class data-manager-data-directory (nfiles:data-file data-manager-file)
    ()
    (:export-class-name-p t)
    (:accessor-name-transformer (class*:make-name-transformer name)))
  