anchor.diff:  (defmethod %follow-hint ((clickable-hint clickable-hint))
     (click-element :nyxt-identifier (identifier clickable-hint)))
   
  -(defmethod %follow-hint ((input-hint input-hint))
  -  (focus-element :nyxt-identifier (identifier input-hint)))
  -
  -(defmethod %follow-hint ((textarea-hint textarea-hint))
  -  (focus-element :nyxt-identifier (identifier textarea-hint)))
  +(defmethod %follow-hint ((focusable-hint focusable-hint))
  +  (focus-element :nyxt-identifier (identifier focusable-hint)))
   
   (defmethod %follow-hint-new-buffer-focus ((link-hint link-hint))
     (make-buffer-focus :url (url link-hint)))
  
positive.code: (defmethod object-display ((button-hint button-hint))
    (format nil "~a  ~a  Button" (hint button-hint) (body button-hint)))
  
  (defmethod object-display ((input-hint input-hint))
    (format nil "~a  Input" (hint input-hint)))
  
  
negative.code:           ((equal "IMG" (ps:@ element tag-name))
             (ps:create "type" "img" "hint" hint "identifier" hint "src" (ps:@ element src) "alt" (ps:@ element alt)))
            ((ps:@ element onclick)
             (ps:create "type" "clickable" "hint" hint "identifier" hint "body" (ps:@ element |innerHTML|)))
            ((ps:@ element onfocus)
             (ps:create "type" "focusable" "hint" hint "identifier" hint))))
  
    (defun hints-add (elements)
      "Adds hints on elements"
  