summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorCase Duckworth2021-04-06 12:44:49 -0500
committerCase Duckworth2021-04-06 12:44:49 -0500
commitb0377f3f9b91f08de96d5ecacf3644ab310f810c (patch)
tree1bf432adc242fa8ceb6716e2b89affb5f3cc5344
parentTruncate lines in the minibuffer (diff)
downloademacs-b0377f3f9b91f08de96d5ecacf3644ab310f810c.tar.gz
emacs-b0377f3f9b91f08de96d5ecacf3644ab310f810c.zip
Switch `icomplete-vertical' for `vertico'
-rw-r--r--init.el26
1 files changed, 12 insertions, 14 deletions
diff --git a/init.el b/init.el index 535bbbb..abb469d 100644 --- a/init.el +++ b/init.el
@@ -226,7 +226,10 @@
226 icomplete-show-matches-on-no-input t 226 icomplete-show-matches-on-no-input t
227 icomplete-with-buffer-completion-tables t 227 icomplete-with-buffer-completion-tables t
228 icomplete-in-buffer t 228 icomplete-in-buffer t
229 completion-styles '(partial-completion substring flex)) 229 completion-styles '(partial-completion substring flex)
230 completion-category-defaults nil
231 completion-category-overrides
232 '((file (styles . (partial-completion)))))
230 (fido-mode -1) 233 (fido-mode -1)
231 (icomplete-mode +1)) 234 (icomplete-mode +1))
232 235
@@ -593,19 +596,14 @@ call `zzz-to-char'."
593 (global-undo-fu-session-mode +1)) 596 (global-undo-fu-session-mode +1))
594 597
595;;;; Minibuffer 598;;;; Minibuffer
596 599(setup (:straight (vertico
597;;;;; Icomplete-vertical 600 :host github
598(setup (:straight icomplete-vertical) 601 :repo "minad/vertico"))
599 (let ((map icomplete-minibuffer-map)) 602 (advice-add #'completing-read-multiple :filter-args
600 (let ((command #'icomplete-forward-completions)) 603 (defun crm-indicator (args)
601 (define-key map (kbd "<down>") command) 604 (cons (concat "[CRM] " (car args)) (cdr args))))
602 (define-key map (kbd "C-n") command)) 605 (icomplete-mode -1)
603 (let ((command #'icomplete-backward-completions)) 606 (vertico-mode +1))
604 (define-key map (kbd "<up>") command)
605 (define-key map (kbd "C-p") command))
606 (define-key map (kbd "RET") #'icomplete-force-complete-and-exit)
607 (define-key map (kbd "C-RET") #'minibuffer-complete-and-exit))
608 (icomplete-vertical-mode +1))
609 607
610;;;;; Orderless 608;;;;; Orderless
611(setup (:straight orderless) 609(setup (:straight orderless)