anchor.diff:  - SHORTCUT TERM: Use SEARCH-URL to search TERM.  If SEARCH-URL is empty, fallback on other search engines.")
      (search-url :initarg :search-url
                  :accessor search-url
  -               :type string
  -               :initform "")))
  +               :type string)))
   
   (defmethod object-string ((entry bookmark-entry))
     (format nil "~a~a  ~a~a"
  
positive.code:                         :if-does-not-exist :create
                          :if-exists :supersede)
      ;; TODO: Sort by customizable function, ignore protocol by default.
      ;; TODO: Print 1 bookmark per line.
      ;; We READ the output of serialize-sexp to make it more human-readable.
      (let ((*package* *package*))
        ;; We need to make sure current package is :next so that
        ;; symbols a printed with consistent namespaces.
        (in-package :next)
        (format file
                "~s"
                (with-input-from-string (in (with-output-to-string (out)
                                              (s-serialization:serialize-sexp (bookmarks-data *interface*) out)))
                  (read in))))))
  
  (defun restore-sexp-bookmarks ()
    "Restore the bookmarks from the interface `bookmarks-path'."
  
negative.code:                       (when file
                          ;; We need to make sure current package is :next so that
                          ;; symbols a printed with consistent namespaces.
                          (let (;; (*print-case* :downcase) ; TODO: Wait until prevalence fully supports it.
                                (*package* *package*))
                            (in-package :next)
                            (s-serialization:deserialize-sexp file))))))
            (when data
  