anchor.diff:  
   (define-command bookmark-url ()
     "Allow the user to bookmark a URL via minibuffer input."
  -  (with-result (url (read-from-minibuffer
  -                     (make-minibuffer
  -                      :input-prompt "Bookmark URL")))
  -    (bookmark-add url)))
  +  (with-result* ((url (read-from-minibuffer
  +                       (make-minibuffer
  +                        :input-prompt "Bookmark URL")))
  +                 (tags (read-from-minibuffer
  +                        (make-minibuffer
  +                         :input-prompt "Space-separated tag(s)"
  +                         :multi-selection-p t
  +                         :completion-function (tag-completion-filter
  +                                               :with-empty-tag t)
  +                         :empty-complete-immediate t))))
  +
  +    (bookmark-add url :tags tags)))
   
   (define-command bookmark-delete ()
     "Delete bookmark(s)."
  
positive.code:                                    :url url)))
        (unless (str:emptyp title)
          (setf (title entry) title))
        (setf tags (delete-duplicates (append (tags entry) tags)
                                      :test #'string=))
        (setf (tags entry) (sort tags #'string<))
  
negative.code:                                                      :with-empty-tag t
                                                       :extra-tags (make-tags (extract-keywords body 5)))
                                 :empty-complete-immediate t))))
            (bookmark-add (url buffer)
                          :title (title buffer)
                          :tags tags)
  