From 1377325582ef8c8a1a2720172e3f5a9a854dfd51 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Sat, 9 Sep 2023 21:07:35 +0300 Subject: devtools.el: Add keybinding for consult-register-store --- .emacs.d/modules/thanos-devtools.el | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) (limited to '.emacs.d/modules/thanos-devtools.el') diff --git a/.emacs.d/modules/thanos-devtools.el b/.emacs.d/modules/thanos-devtools.el index b24e92c..74ac05e 100644 --- a/.emacs.d/modules/thanos-devtools.el +++ b/.emacs.d/modules/thanos-devtools.el @@ -60,13 +60,9 @@ (define-key global-map (kbd "C-x r d") 'bookmark-delete) (define-key global-map (kbd "C-x r C-r") 'bookmark-rename) (define-key global-map (kbd "C-x r .") 'consult-register) +(define-key global-map (kbd "C-x r s") 'consult-register-store) (define-key corfu-map (kbd "RET") nil) ;; Leave my enter alone -(define-prefix-command 'thanos/consult-register) -(define-key global-map (kbd "C-c r") 'thanos/consult-register) -(define-key thanos/consult-register (kbd ".") 'consult-register) -(define-key thanos/consult-register (kbd "s") 'consult-register-store) - (setf register-preview-delay 0.5 register-preview-function #'consult-register-format) -- cgit v1.2.3