;;; module-vertico.el --- vertical completion
;;; Commentary:
;;;
;;; Vertical completion UI for Emacs minibuffer.
;;;
;;; Code:

(require 'module-pkg)
(pkg/require 'vertico)


(vertico-mode)
(setq vertico-cycle t
			vertico-count 13
			read-file-name-completion-ignore-case t
			read-buffer-completion-ignore-case t)

(pkg/with-eval-after-load
 (vertico)
 
 (require 'vertico-quick)
 (define-key vertico-map (kbd "C-q") #'vertico-quick-insert)
 (define-key vertico-map (kbd "M-q") #'vertico-quick-exit))

(provide 'module-vertico)
;;; module-vertico.el ends here.