anchor.diff:          t nil)))
   
     (defun object-create (element hint)
  -    (cond ((equal "P" (ps:@ element tag-name))
  -           (ps:create "type" "p" "hint" hint "identifier" hint "body" (ps:@ element |innerHTML|)))))
  +    (ps:create "type" "p" "hint" hint "identifier" hint "body" (ps:@ element |innerHTML|)))
   
     (defun hints-add (elements)
       "Adds hints on elements"
  
positive.code:     "Alias of document.querySelectorAll"
      (ps:chain context (query-selector-all selector)))
  
    (defun code-char (n)
      "Alias of String.fromCharCode"
      (ps:chain -string (from-char-code n)))
  
negative.code:                        (rem n 26)))) ""))
  
    (add-stylesheet)
    (hints-add (qsa-text-nodes))
    ;;(hints-add (qsa document "p"))
    )
  
  (defclass paragraph-hint (nyxt/web-mode::hint) ())
  
  