feat(completion): add consult-dir

abougouffa · Nov 10, 2023 · 877e677 · 877e677
1 parent bf54bcd
commit 877e677
Show file tree

Hide file tree

Showing 2 changed files with 14 additions and 2 deletions.
diff --git a/core/me-completion.el b/core/me-completion.el
@@ -185,8 +185,8 @@ This depends on `+cape-hosts' and `+cape-global-capes'."
     ;; code
     "cm"  #'consult-flymake
     "cE"  #'consult-compile-error
-    ;; unclassified
-    "xc"  #'consult-complex-command
+    ;; extras
+    "ec"  #'consult-complex-command
     ;; insert
     "iy"  #'consult-yank-from-kill-ring
     "ip"  #'consult-yank-pop
@@ -211,6 +211,15 @@ This depends on `+cape-hosts' and `+cape-global-capes'."
    consult-man :initial (+region-or-thing-at-point)
    consult-ripgrep :initial (+region-or-thing-at-point)))
 
+(use-package consult-dir
+  :straight t
+  :bind (("C-x C-d" . consult-dir)
+         :map vertico-map
+         ("C-x C-d" . consult-dir)
+         ("C-x C-j" . consult-dir-jump-file))
+  :init
+  (+map! "ed" #'consult-dir))
+
 (use-package embark
   :straight t
   :bind ("<remap> <describe-bindings>" . embark-bindings)

diff --git a/core/me-keybindings.el b/core/me-keybindings.el
@@ -202,6 +202,9 @@
     "hdf"  #'describe-function
     "hdp"  #'describe-package
 
+    ;; ====== Extras ======
+    "e"    '(nil :wk "extras")
+
     ;; ====== Project ======
     "p"    '(nil :wk "project"))