Nyxt: Update %slot-default to %slot-default%.
parent
5e37f8c2b7
commit
724e96111d
|
@ -1,4 +1,4 @@
|
||||||
(define-configuration web-buffer
|
(define-configuration web-buffer
|
||||||
((request-resource-hook
|
((request-resource-hook
|
||||||
(reduce #'hooks:add-hook *my-request-resource-handlers*
|
(reduce #'hooks:add-hook *my-request-resource-handlers*
|
||||||
:initial-value %slot-default))))
|
:initial-value %slot-default%))))
|
||||||
|
|
|
@ -89,7 +89,7 @@
|
||||||
"m.media-amazon.com")))
|
"m.media-amazon.com")))
|
||||||
|
|
||||||
(define-configuration nyxt/blocker-mode:blocker-mode
|
(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)
|
(defun format-c->lisp (s)
|
||||||
"Incomplete substitution of C format string to Lisp format string.
|
"Incomplete substitution of C format string to Lisp format string.
|
||||||
|
@ -118,17 +118,20 @@ Recognized formats:
|
||||||
(read-emacs-engines s))))
|
(read-emacs-engines s))))
|
||||||
|
|
||||||
(define-configuration buffer ; Multiple configurations work!
|
(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
|
(bookmarks-path (make-instance 'bookmarks-data-path
|
||||||
:basename (personal-file "bookmarks/bookmarks.lisp.gpg")))
|
:basename (personal-file "bookmarks/bookmarks.lisp.gpg")))
|
||||||
(auto-mode-rules-path
|
(auto-mode-rules-path
|
||||||
(make-instance 'auto-mode-rules-data-path :basename (personal-file "bookmarks/auto-mode-rules.lisp.gpg")))))
|
(make-instance 'auto-mode-rules-data-path :basename (personal-file "bookmarks/auto-mode-rules.lisp.gpg")))))
|
||||||
|
|
||||||
(define-configuration (buffer web-buffer nosave-buffer)
|
(define-configuration (buffer web-buffer nosave-buffer)
|
||||||
((default-modes (append '(my-mode vi-normal-mode
|
((default-modes (append '(;; dark-mode
|
||||||
;; dark-mode
|
vi-normal-mode
|
||||||
)
|
my-mode)
|
||||||
%slot-default))))
|
%slot-default%))))
|
||||||
|
|
||||||
|
;; (define-configuration (prompt-buffer)
|
||||||
|
;; ((default-modes (append '(vi-normal-mode) %slot-default%))))
|
||||||
|
|
||||||
(define-configuration (web-buffer nosave-buffer)
|
(define-configuration (web-buffer nosave-buffer)
|
||||||
((default-modes (append
|
((default-modes (append
|
||||||
|
@ -139,7 +142,7 @@ Recognized formats:
|
||||||
noscript-mode
|
noscript-mode
|
||||||
proxy-mode
|
proxy-mode
|
||||||
reduce-tracking-mode)
|
reduce-tracking-mode)
|
||||||
%slot-default))))
|
%slot-default%))))
|
||||||
|
|
||||||
(defvar *my-request-resource-handlers*
|
(defvar *my-request-resource-handlers*
|
||||||
(list
|
(list
|
||||||
|
|
Loading…
Reference in New Issue