anchor.diff:      (when result
         (bookmark-add (quri:uri (url result)) :tags tags))))
   
  -(define-command download-hint-url (&key annotate-full-document)
  +(define-command download-hint-url (&key annotate-visible-only)
     "Download the file under the URL(s) hinted by the user."
     (query-hints "Download link URL"
                  (lambda (selected-links)
  
positive.code: 
  (in-package :nyxt/web-mode)
  
  (define-parenscript add-element-hints (&key annotate-full-document)
    (defun qs (context selector)
      "Alias of document.querySelector"
      (ps:chain context (query-selector selector)))
  
negative.code:                                      :scroll scroll))
            (remove-focus)))))
  
  (define-command follow-hint (&key annotate-visible-only)
    "Show a set of element hints, and go to the user inputted one in the
  currently active buffer."
    (query-hints "Go to element" '%follow-hint
                 :annotate-visible-only annotate-visible-only))
  
  (define-command follow-hint-new-buffer (&key annotate-visible-only)
    "Show a set of element hints, and open the user inputted one in a new
  buffer (not set to visible active buffer)."
    (query-hints "Open element in new buffer"
                 (lambda (result) (mapcar #'%follow-hint-new-buffer result))
                 :multi-selection-p t
                 :annotate-visible-only annotate-visible-only))
  
  (define-command follow-hint-new-buffer-focus (&key annotate-visible-only)
    "Show a set of element hints, and open the user inputted one in a new
  visible active buffer."
    (query-hints "Go to element in new buffer"
  