28 lines
931 B
Common Lisp
28 lines
931 B
Common Lisp
;; vi keybindings
|
|
(define-configuration buffer
|
|
((default-modes
|
|
(pushnew 'nyxt/mode/vi:vi-normal-mode %slot-value%))))
|
|
|
|
;; Vi-insert mode for prompt-buffer (minibuffer)
|
|
(define-configuration prompt-buffer
|
|
((default-modes (append '(vi-insert-mode) %slot-default%))))
|
|
|
|
(defvar *my-search-engines*
|
|
(list
|
|
'("ddg" "https://duckduckgo.com/search?q=~a" "https://duckduckgo.com"))
|
|
"List of search engines.")
|
|
|
|
(define-configuration context-buffer
|
|
"Set DuckDuckGo as the default search engine."
|
|
((search-engines
|
|
(append %slot-default%
|
|
(mapcar
|
|
(lambda (engine) (apply 'make-search-engine engine))
|
|
*my-search-engines*)))))
|
|
|
|
(define-configuration (web-buffer)
|
|
((default-modes (pushnew 'nyxt/mode/blocker:blocker-mode %slot-value%))))
|
|
|
|
(defmethod customize-instance ((document-buffer document-buffer) &key)
|
|
(setf (slot-value document-buffer 'zoom-ratio-default) 1.1))
|