;;; Custom keymap
(defvar *my-keymap* (make-keymap "my-map"))
(define-key *my-keymap*
  "C-f" 'nyxt/web-mode:history-forwards
  "C-b" 'nyxt/web-mode:history-backwards
  "C-s" 'nyxt/web-mode:search-buffer
  "C-v" 'nyxt/visual-mode:visual-mode)

(define-mode gavin-mode ()
  "Dummy mode for the custom key bindings in `*my-keymap*'."
  ((keymap-scheme (keymap:make-scheme
                   scheme:cua *my-keymap*
                   scheme:emacs *my-keymap*
                   scheme:vi-normal *my-keymap*))))

(define-configuration (buffer web-buffer)
  ((default-modes (append '(gavin-mode) %slot-default))))