diff --git a/config.org b/config.org index 79558a5..6266d4e 100644 --- a/config.org +++ b/config.org @@ -611,7 +611,7 @@ Exclude some dirs from spamming recentf * Helm As an alternative to ivy/counsel/swiper? -#+begin_src emacs-lisp ++begin_src emacs-lisp (use-package helm :ensure t :hook @@ -633,6 +633,73 @@ As an alternative to ivy/counsel/swiper? (helm-autoresize-max-height 20) (helm-autoresize-min-height 5) ) ++end_src + +* Selectrum & Co. +Uses default features of emacs instead of bringing a new framework in like helm or counsel +#+begin_src emacs-lisp +(use-package selectrum + :ensure t + :config + (selectrum-mode) + ) + +(use-package orderless + :ensure t + :custom + (completion-styles '(orderless)) + ) + +(use-package selectrum-prescient + :ensure t + :config + (setq selectrum-prescient-enable-filtering nil) + (selectrum-prescient-mode) + (prescient-persist-mode) + ) + +(use-package consult + :ensure t + :bind + (("C-x C-r" . consult-recent-file) + ("C-x b" . consult-buffer) + ("C-s" . consult-line)) + ) + +;; shows descriptions in M-x +(use-package marginalia + :ensure t + :config + (marginalia-mode) + :custom + ;; switch by 'marginalia-cycle + (marginalia-annotators '(marginalia-annotators-heavy + marginalia-annotators-light + nil)) + ) + +;; do stuff on minibuffer results +(use-package embark + :ensure t + :bind + (("C-S-a" . embark-act) + ("C-h B" . embark-bindings)) + :init + (setq prefix-help-command #'embark-prefix-help-command) + :config + ;; hide modeline of the embark live/completions buffers + (add-to-list 'display-buffer-alist + '("\\`\\*Embark Collect \\(Live\\|Completions\\)\\*" + nil + (window-parameters (mode-line-format . none)))) +) + +(use-package embark-consult + :ensure t + :after (embark consult) + :demand t + :hook + (embark-collect-mode . embark-consult-preview-minor-mode)) #+end_src * misc #+begin_src emacs-lisp