;;; -*- lexical-binding: t; -*-
;;; Commentary:
;;; Code:


(setopt use-short-answers t
        vc-follow-symlinks t
        completion-ignore-case t
        read-buffer-completion-ignore-case t
        ;; required for exwm (pass) but
        ;; always useful
        enable-recursive-minibuffers t)
(minibuffer-depth-indicate-mode 1)


(use-package vertico
  :init
  (vertico-mode)
  :custom
  (vertico-reverse-mode)
  (vertico-cycle t))

(use-package marginalia
  :init
  (marginalia-mode))

(use-package orderless
  :custom
  ;; order to try completions
  (completion-styles '(basic
                       substring
                       initials
                       flex
                       orderless))
  (completion-category-defaults nil)
  (completion-category-overrides '((file (styles partial-completion)))))

(use-package consult
  :bind (("C-x b" . consult-buffer)
         ("H-s d" . consult-find)
         ("H-s c" . consult-locate)
         ("H-s g" . consult-grep)
         ("H-s G" . consult-git-grep)
         ("H-s r" . consult-ripgrep)
         ("H-s l" . consult-line)
	 ("H-s i" . consult-info)
         ("H-s L" . consult-line-multi)
         ("H-s k" . consult-keep-lines)
         ("H-s u" . consult-focus-lines)))


(provide 'bd--minibuffer)
;;; bd-minibuffer ends here