diff --git a/modules/completion/selectrum/TODO.org b/modules/completion/selectrum/TODO.org index c5a91a98d..8849b490d 100644 --- a/modules/completion/selectrum/TODO.org +++ b/modules/completion/selectrum/TODO.org @@ -1,17 +1,18 @@ * PROJ List of things not working -** TODO Functions very slow on startup: -- =consult-recent-files= -- =consult-bookmark= -preview deactivated for now (see consult use-package) ** TODO Add vanilla keybindings *** TODO Add keybinding for embark-act ** TODO =SPC s s= and =SPC s S= ~:sw~ There isn't really a selectrum analogue to ~swiper-isearch~, ~consult-isearch~ does something else (give you previously used isearch search terms). -** TODO fix C-SPC -currently after executing the action it: -- moves the cursor to the new window if created, might not be desired in all cases -- for some reason opens buffers in a new window (might be upstream bug?) +** TODO =C-SPC= and live previews +Automatic live previews have been globally disabled for speed purposes. +=C-SPC= is partially implemented with the preview key for ~consult-*~ commands. +Need to get it to work for other selectrum commands such =SPC h f=. +#+begin_src emacs-lisp + (let ((embark-quit-after-action nil)) + (map! :map minibuffer-local-map "C-SPC" #'embark-default-action))) +#+end_src +gets us close but moves the cursor to the new screen which is undesirable. * PROJ List of things needed for Ivy parity ** TODO Icons https://github.com/minad/marginalia/issues/59 @@ -32,3 +33,4 @@ In selectrum, it leads to =/foo/bar!= ** TODO bind =consult-lsp-diagnostics= to something? ** TODO test out bibtex-actions, check if more configuration should be added https://github.com/bdarcus/bibtex-actions + . diff --git a/modules/completion/selectrum/config.el b/modules/completion/selectrum/config.el index 9a027c7c5..72328fb58 100644 --- a/modules/completion/selectrum/config.el +++ b/modules/completion/selectrum/config.el @@ -80,8 +80,9 @@ (setq consult-project-root-function #'doom-project-root) (setq completion-in-region-function #'consult-completion-in-region) (setq consult-narrow-key "<") - (setf (alist-get #'consult-bookmark consult-config) (list :preview-key nil)) - (setf (alist-get #'consult-recent-file consult-config) (list :preview-key nil)) + (setf (alist-get #'consult-bookmark consult-config) (list :preview-key (kbd "C-SPC"))) + (setf (alist-get #'consult-recent-file consult-config) (list :preview-key (kbd "C-SPC"))) + (setf (alist-get #'consult--grep consult-config) (list :preview-key (kbd "C-SPC"))) (setq consult-line-numbers-widen t) (setq consult-async-input-debounce 0.5) (setq consult-async-input-throttle 0.8)) @@ -111,9 +112,7 @@ :desc "Open target with sudo" "s" #'sudo-edit :desc "Open target with vlf" "l" #'vlf :map embark-file-map - :desc "Cycle marginalia views" "A" #'marginalia-cycle ) - (let ((embark-quit-after-action nil)) - (map! :map minibuffer-local-map "C-SPC" #'embark-default-action))) + :desc "Cycle marginalia views" "A" #'marginalia-cycle)) (use-package! marginalia :hook (doom-first-input . marginalia-mode)