about summary refs log tree commit diff stats
path: root/.emacs.d
diff options
context:
space:
mode:
authorDavid Morgan <djm_uk@protonmail.com>2024-09-13 14:22:55 +0100
committerDavid Morgan <djm_uk@protonmail.com>2024-09-13 14:22:55 +0100
commitdf8702c60fe07a55bf556fb264bc7c306a823463 (patch)
tree5fbf917d7c3bded4411a401d020b2613eacde5dc /.emacs.d
parentd7b5b5b0521315e1b735f9c3d4928432d0565f4a (diff)
downloaddotfiles-df8702c60fe07a55bf556fb264bc7c306a823463.tar.gz
Change some bindings and expand embark-consult-async-search-map
Diffstat (limited to '.emacs.d')
-rw-r--r--.emacs.d/lisp/init-minibuffer.el9
-rw-r--r--.emacs.d/lisp/init-sql.el2
2 files changed, 7 insertions, 4 deletions
diff --git a/.emacs.d/lisp/init-minibuffer.el b/.emacs.d/lisp/init-minibuffer.el
index 4d5cb67..cf45793 100644
--- a/.emacs.d/lisp/init-minibuffer.el
+++ b/.emacs.d/lisp/init-minibuffer.el
@@ -227,7 +227,7 @@ DEFS is a plist associating completion categories to commands."
                ("G" . consult-git-grep)
                ("r" . consult-ripgrep)
                ("R" . consult-ripgrep) ;; can't use r in isearch-mode, so add R too
-               ("M-r" . consult-ripgrep-unrestricted)
+               ("u" . consult-ripgrep-unrestricted)
                ("*" . consult-ripgrep-thing-at-point)
                ("z" . consult-z-ripgrep)
                ("^" . consult-ripgrep-parent)
@@ -235,7 +235,7 @@ DEFS is a plist associating completion categories to commands."
                ("L" . consult-line-multi)
                ("m" . consult-multi-occur)
                ("k" . consult-keep-lines)
-               ("u" . consult-focus-lines)
+               ("C-f" . consult-focus-lines)
                ("e" . consult-isearch-history))
          (:map vertico-map
                ;; These are used for previewing with some consult commands (see consult-customize call below)
@@ -491,8 +491,11 @@ The leading # added by other consult commands is removed."
   :bind
   (:map embark-consult-async-search-map
         ("l" . +become-consult-line)
+        ("f" . consult-focus-lines)
         ("^" . consult-ripgrep-parent)
-        ("R" . consult-ripgrep-unrestricted))
+        ("u" . consult-ripgrep-unrestricted)
+        ("c" . consult-ripgrep-case-sensitive)
+        ("z" . consult-z-ripgrep))
   :hook
   (embark-collect-mode . consult-preview-at-point-mode))
 
diff --git a/.emacs.d/lisp/init-sql.el b/.emacs.d/lisp/init-sql.el
index d71e73d..ca304e1 100644
--- a/.emacs.d/lisp/init-sql.el
+++ b/.emacs.d/lisp/init-sql.el
@@ -46,7 +46,7 @@
   :hook
   (sql-mode . sqlup-mode)
   (sql-interactive-mode . sqlup-mode)
-  :bind ("C-c c u" . sqlup-capitalize-keywords-in-region))
+  :bind ("C-c c C-u" . sqlup-capitalize-keywords-in-region))
 
 (use-package sql-indent
   :commands sqlind-minor-mode)