anchor.diff:  (define-command describe-class (&optional class-suggestion)
     "Inspect a class and show it in a help buffer."
     (if class-suggestion
  -      (let ((input (class-suggestion-name class-suggestion)))
  +      (let ((input class-suggestion))
           (with-current-html-buffer (buffer
                                      (str:concat "*Help-" (symbol-name input) "*")
                                      'nyxt/help-mode:help-mode)
  
positive.code: (define-class variable-source (prompter:source)
    ((prompter:name "Variables")
     (prompter:must-match-p t)
     (prompter:constructor
      (mapcar (lambda (v) (make-variable-suggestion :name v))
              (package-variables)))
     (prompter:actions (list (make-unmapped-command describe-variable)))))
  
  (define-command describe-any ()
  
negative.code: (define-command describe-variable (&optional variable-suggestion)
    "Inspect a variable and show it in a help buffer."
    (if variable-suggestion
        (let* ((input variable-suggestion))
          (with-current-html-buffer (buffer
                                     (str:concat "*Help-" (symbol-name input) "*")
                                     'nyxt/help-mode:help-mode)
  