embark provides actions for minibuffer stuff.
2.1. Package Install
Time to setup the
(use-package embark :bind ( ;; Run the context menu for embark ("M-a" . embark-act) ;; Run the context menu for embark but do not quit ("M-S-a" . zamlz/embark-act-noquit) ;; alternative for `describe-bindings' ("C-h B" . embark-bindings)))
2.2. Embark-Act No Quit
This is a simple function that lets us run
embark-act but not quit after running the corresponding action. For some reason this doesn't work as expected…
(defun zamlz/embark-act-noquit () "Run action but don't quit the minibuffer afterwards." (interactive) (let ((embark-quit-after-action nil)) (embark-act)))
2.3. Consult Integration
This also sets up Consult integration for
(use-package embark-consult :disabled :after (embark consult) :demand t ; only necessary if you have the hook below ;; if you want to have consult previews as you move around an ;; auto-updating embark collect buffer :hook (embark-collect-mode . consult-preview-at-point-mode))
embark-act, let's make sure to use which-key so that we don't have to always remember which keys are available to us.
(setq embark-action-indicator (lambda (map _target) (which-key--show-keymap "Embark" map nil nil 'no-paging) #'which-key--hide-popup-ignore-command) embark-become-indicator embark-action-indicator)
2.5. Feature Provide