diff options
-rw-r--r-- | .emacs.d/modules/thanos-tools.el | 16 |
1 files changed, 9 insertions, 7 deletions
diff --git a/.emacs.d/modules/thanos-tools.el b/.emacs.d/modules/thanos-tools.el index 5823885..7ad467d 100644 --- a/.emacs.d/modules/thanos-tools.el +++ b/.emacs.d/modules/thanos-tools.el @@ -64,20 +64,22 @@ (setf indent-tabs-mode nil) ;; Register & Consult -(define-key Info-mode-map (kbd "F") 'consult-info) (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 global-map (kbd "C-x r b") 'consult-bookmark) -(define-key global-map (kbd "C-c g") 'consult-grep) -(define-key global-map (kbd "C-c f") 'consult-find) -(define-prefix-command 'thanos/search) +(defvar-keymap thanos/search + :doc "Keymap for search commands." + "f" #'isearch-forward + "b" #'isearch-backward + "s" #'consult-line + "C-f" #'consult-find + "C-g" #'consult-grep + "C-i" #'consult-info) + (define-key global-map (kbd "C-s") thanos/search) -(define-key thanos/search (kbd "f") 'isearch-forward) -(define-key thanos/search (kbd "b") 'isearch-backward) -(define-key thanos/search (kbd "s") 'consult-line) (define-key project-prefix-map (kbd "b") 'consult-project-buffer) (define-key global-map (kbd "M-y") 'consult-yank-from-kill-ring) |