anchor.diff:  (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:constructor (package-variables))
      (prompter:actions (list (make-unmapped-command describe-variable)))))
   
   (define-command describe-any ()
  
positive.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-name variable-suggestion)))
          (with-current-html-buffer (buffer
                                     (str:concat "*Help-" (symbol-name input) "*")
                                     'nyxt/help-mode:help-mode)
  
negative.code: ;;;; SPDX-License-Identifier: BSD-3-Clause
  
  (in-package :nyxt)
  
  (define-class function-source (prompter:source)
    ((prompter:name "Functions")
     (prompter:must-match-p t)
     (prompter:constructor (package-functions))
     (prompter:actions (list (make-unmapped-command describe-function)))))
  
  (define-class class-source (prompter:source)
    ((prompter:name "Classes")
     (prompter:must-match-p t)
     (prompter:constructor (package-classes))
     (prompter:actions (list (make-unmapped-command describe-class)))))
  
  (define-class slot-source (prompter:source)
  