anchor.diff:  (defun configure-slot (slot class &key
                                       (type (getf (mopu:slot-properties (find-class class) slot)
                                                   :type)))
  -  "Set the value of a slot in `*auto-config-file*'.
  +  "Set value of CLASS' SLOT in `*auto-config-file*'.
   CLASS is a class symbol."
     (sera:nlet lp ()
       (let ((input (read-from-string
  
positive.code:   (nyxt/document-mode:print-buffer))
  
  (defun tls-help (buffer url)
    "This function is invoked upon TLS certificate errors to give users
  help on how to proceed."
    (setf (status buffer) :failed)
    (html-set
     (spinneret:with-html-string
  
negative.code: 
  (define-internal-page-command-global new ()
      (buffer "*New buffer*")
    "Open up a buffer with useful links suitable for `default-new-buffer-url'."
    (spinneret:with-html-string
      (:style (:raw (theme:themed-css (theme *browser*)
                      (body
  