anchor.diff:                 :selector "a, img"))
   
   (define-command download-hint-url ()
  -  "Download the file under the URL(s) hinted by the user."
  +  "Prompt for element hints and download them."
     (let ((buffer (current-buffer)))
       (query-hints "Download link URL"
                    (lambda (selected-links)
  
positive.code:                            result)))))
  
  (define-command copy-hint-url ()
    "Show a set of element hints, and copy the URL of the user inputted one."
    (query-hints "Copy element URL" (lambda (result)  (%copy-hint-url (first result)))
                 :multi-selection-p nil
                 :selector "a, img"))
  
  (define-command bookmark-hint ()
    "Show link hints on screen, and allow the user to bookmark one."
    (query-hints "Bookmark hint"
                 (lambda (result)
                   (dolist (url (mapcar #'url result))
  
negative.code:                            (rest results))))))
  
  (define-command follow-hint-new-buffer ()
    "Like `follow-hint', but open the selected hints in new buffers (no focus)."
    (let ((buffer (current-buffer)))
      (query-hints "Open element in new buffer"
                   (lambda (result) (mapcar (alex:rcurry #'%follow-hint-new-buffer buffer)
                                            result)))))
  
  (define-command follow-hint-new-buffer-focus ()
    "Like `follow-hint-new-buffer', but with focus."
    (let ((buffer (current-buffer)))
      (query-hints "Go to element in new buffer"
                   (lambda (result)
  