;;; syd-ui.el -*- lexical-binding: t; -*-

;; Show possible completions for a partially-entered key sequence.
(use-package which-key
  :custom
  (which-key-allow-evil-operators t)
  (which-key-show-operator-state-maps t)
  :config
  (which-key-mode 1))

;; Beautiful theme in dark and light.
(use-package kanagawa-themes
  :config
  (load-theme 'kanagawa-wave t))

(use-package emacs
  :custom
  ;; Allow the opening of new minibuffers from inside existing minibuffers.
  (enable-recursive-minibuffers t)
  ;; Hide commands in M-x which do not work in the current mode.
  (read-extended-command-predicate #'command-completion-default-include-p)
  :config
  ;; Disable blinking cursor.  I don't really like it, but it also doesn't play
  ;; well with `evil-terminal-cursor-changer'.
  (blink-cursor-mode -1))

(use-package vertico
  :init
  (vertico-mode 1))

;; Orderless provides a completion style that divides the pattern into
;; space-separated components, and matches candidates that match all of the
;; components in any order.  Each component can match in any one of several
;; ways: literally, as a regexp, as an initialism, in the flex style, or as
;; multiple word prefixes.  By default, regexp and literal matches are enabled.
(use-package orderless
  :custom
  (completion-styles '(orderless basic))
  (completion-category-overrides '((file (styles basic partial-completion)))))

(provide 'syd-ui)