diff --git a/init.el b/init.el
index ad08ce5..2305363 100644
--- a/init.el
+++ b/init.el
@@ -315,6 +315,7 @@ PRED is nil, the value of `my/kill-some-buffers-default-pred' is used."
       (setq all-action nil)
       (dolist (buffer ask-again-buffers)
         (act-on (ask-about buffer nil) buffer nil)))))
+(keymap-global-set "C-x K" 'my/kill-some-buffers)
 
 (use-package tab-bar
   :ensure nil
@@ -490,7 +491,7 @@ directory. Otherwise, run `find-file' on that file."
                      'evil-cp-append
                      'evil-cp-insert-at-beginning-of-form
                      'evil-cp-insert-at-end-of-form)
-  (define-key evil-cleverparens-mode-map (kbd "<normal-state> M-o") nil t)
+  (keymap-unset evil-cleverparens-mode-map "<normal-state> M-o" t)
   (defun my/-enable-evil-cleverparens ()
     (if (member major-mode '(lisp-mode emacs-lisp-mode
                                        lisp-interaction-mode))
@@ -1010,13 +1011,13 @@ With PROJECT, give diagnostics for all buffers in the current project."
    :lookup #'consult--lookup-candidate
    :state (consult--jump-state)))
 (with-eval-after-load 'flymake
-  (define-key flymake-mode-map (kbd "C-c e") 'my/diagnostic-at-point)
-  (define-key flymake-mode-map (kbd "C-c E") 'my/consult-flymake-flycheck))
+  (keymap-set flymake-mode-map "C-c e" 'my/diagnostic-at-point)
+  (keymap-set flymake-mode-map "C-c E" 'my/consult-flymake-flycheck))
 (with-eval-after-load 'flycheck
-  (define-key flycheck-mode-map (kbd "C-c e") 'my/diagnostic-at-point)
-  (define-key flycheck-mode-map (kbd "C-c E") 'my/consult-flymake-flycheck))
+  (keymap-set flycheck-mode-map "C-c e" 'my/diagnostic-at-point)
+  (keymap-set flycheck-mode-map "C-c E" 'my/consult-flymake-flycheck))
 (with-eval-after-load 'jinx
-  (define-key jinx-mode-map (kbd "C-c e") 'my/diagnostic-at-point))
+  (keymap-set jinx-mode-map "C-c e" 'my/diagnostic-at-point))
 
 ;; eldoc
 (use-package eldoc
@@ -1355,8 +1356,8 @@ otherwise, call `bibtex-find-text'."
     (setq-local fill-prefix nil)))
 (advice-add 'bibtex-mode :after 'my/-bibtex-fix-fill-prefix)
 (add-hook 'bibtex-mode-hook 'my/-bibtex-setup-indent)
-(define-key bibtex-mode-map (kbd "RET") 'newline-and-indent)
-(define-key bibtex-mode-map (kbd "TAB") 'my/bibtex-indent-or-find-text)
+(keymap-set bibtex-mode-map "RET" 'newline-and-indent)
+(keymap-set bibtex-mode-map "TAB" 'my/bibtex-indent-or-find-text)
 (evil-define-key 'normal bibtex-mode-map
   (kbd "TAB") 'my/bibtex-indent-or-find-text-and-insert)