Nyxt: Update %slot-default to %slot-default%.

.config/nyxt/config.lisp

@@ -1,4 +1,4 @@
 (define-configuration web-buffer
   ((request-resource-hook
     (reduce #'hooks:add-hook *my-request-resource-handlers*
-            :initial-value %slot-default))))
+            :initial-value %slot-default%))))

.config/nyxt/init.lisp

@@ -89,7 +89,7 @@
             "m.media-amazon.com")))
 
 (define-configuration nyxt/blocker-mode:blocker-mode
-  ((nyxt/blocker-mode:hostlists (append (list *my-blocked-hosts*) %slot-default))))
+  ((nyxt/blocker-mode:hostlists (append (list *my-blocked-hosts*) %slot-default%))))
 
 (defun format-c->lisp (s)
   "Incomplete substitution of C format string to Lisp format string.
@@ -118,17 +118,20 @@ Recognized formats:
                  (read-emacs-engines s))))
 
 (define-configuration buffer ; Multiple configurations work!
-  ((search-engines (append my-search-engines %slot-default))
+  ((search-engines (append my-search-engines %slot-default%))
    (bookmarks-path (make-instance 'bookmarks-data-path
                                   :basename (personal-file "bookmarks/bookmarks.lisp.gpg")))
    (auto-mode-rules-path
     (make-instance 'auto-mode-rules-data-path :basename (personal-file "bookmarks/auto-mode-rules.lisp.gpg")))))
 
 (define-configuration (buffer web-buffer nosave-buffer)
-  ((default-modes (append '(my-mode vi-normal-mode
-                            ;; dark-mode
-                            )
-                          %slot-default))))
+  ((default-modes (append '(;; dark-mode
+                            vi-normal-mode
+                            my-mode)
+                          %slot-default%))))
+
+;; (define-configuration (prompt-buffer)
+;;   ((default-modes (append '(vi-normal-mode) %slot-default%))))
 
 (define-configuration (web-buffer nosave-buffer)
   ((default-modes (append
@@ -139,7 +142,7 @@ Recognized formats:
                      noscript-mode
                      proxy-mode
                      reduce-tracking-mode)
-                   %slot-default))))
+                   %slot-default%))))
 
 (defvar *my-request-resource-handlers*
   (list