anchor.diff:             (prompt1
                :prompt "Describe package"
                :sources (make-instance 'package-source))))
  -    (buffer (str:concat "*Help-" (package-name package) "*"))
  +    (buffer (str:concat "*Help-" (package-name package) "*") 'nyxt/help-mode:help-mode)
     "Inspect a package and show it in a help buffer."
     (let ((total-symbols (package-symbols nil (list package)))
           (external-symbols (package-symbols (list package) nil))
  
positive.code: 
  (define-internal-page-command-global describe-slot
      (&key class name universal)
      (buffer (str:concat "*Help-" (symbol-name name) "*"))
    "Inspect a slot and show it in a help buffer."
    (unless (and class name)
      (let ((slot (prompt1
  
negative.code: 
  (sera:eval-always ; To satisfy `fboundp' of `manual' at compile-time (e.g. CCL).
    (define-internal-page-command-global manual ()
        (buffer "*Manual*" 'nyxt/help-mode:help-mode)
      "Show the manual."
      (spinneret:with-html-string (:style (style buffer))
        (:style (cl-css:css '(("body"
  