Files
sydnix/users/crumb/programs/emacs/modules/syd-ui.el
2025-01-17 16:28:45 -07:00

42 lines
1.4 KiB
EmacsLisp

;;; 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)