From d39747b5b23025025bb59ecfb06600308c3bc2bf Mon Sep 17 00:00:00 2001
From: Thomas Voss <mail@thomasvoss.com>
Date: Sat, 19 Oct 2024 17:05:28 +0200
Subject: emacs: Use consult

---
 .config/emacs/modules/mm-completion.el | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/.config/emacs/modules/mm-completion.el b/.config/emacs/modules/mm-completion.el
index 0de3170..91ecd5e 100644
--- a/.config/emacs/modules/mm-completion.el
+++ b/.config/emacs/modules/mm-completion.el
@@ -58,4 +58,21 @@
 (use-package savehist-mode
   :hook (after-init . savehist-mode))
 
+
+;;; Enhanced Replacements for Builtins
+
+;; TODO: Investigate other commands
+(use-package consult
+  :ensure t
+  :bind ( ([remap switch-to-buffer] . consult-buffer)
+          :map consult-narrow-map
+          ("?" . consult-narrow-help))
+  :config
+  (with-eval-after-load 'project
+    (keymap-set project-prefix-map "b" #'consult-project-buffer))
+  (with-eval-after-load 'pulsar
+    (setopt consult-after-jump-hook nil)
+    (dolist (command #'(pulsar-recenter-top pulsar-reveal-entry))
+      (add-hook 'consult-after-jump-hook command))))
+
 (provide 'mm-completion)
-- 
cgit v1.2.3