Some stuff

This commit is contained in:
Alexander Rosenberg 2023-12-27 12:19:44 -08:00
parent 5bcab83bb5
commit b930f3072d
Signed by: Zander671
GPG Key ID: 5FD0394ADBD72730

68
init.el
View File

@ -60,6 +60,9 @@
;; Terminal mouse support
(xterm-mouse-mode 1)
;; Make cursor more visible
(global-hl-line-mode 1)
;; Spell stuff
(setq ispell-program-name "hunspell"
flyspell-issue-message-flag nil
@ -259,31 +262,48 @@ visual states."
(savehist-mode 1))
;; vertico
(use-package vertico
:bind (:map vertico-map
("C-S-k" . kill-line)
("C-k" . vertico-previous)
("C-j" . vertico-next)
("RET" . vertico-directory-enter)
("DEL" . vertico-directory-delete-char)
("M-DEL" . vertico-directory-delete-word))
:hook (minibuffer-setup . cursor-intangible-mode)
;; (use-package vertico
;; :bind (:map vertico-map
;; ("C-S-k" . kill-line)
;; ("C-k" . vertico-previous)
;; ("C-j" . vertico-next)
;; ("RET" . vertico-directory-enter)
;; ("DEL" . vertico-directory-delete-char)
;; ("M-DEL" . vertico-directory-delete-word))
;; :hook (minibuffer-setup . cursor-intangible-mode)
;; :init
;; (defun my/crm-indicator (args)
;; (cons (format "[CRM%s] %s"
;; (replace-regexp-in-string
;; "\\`\\[.*?]\\*\\|\\[.*?]\\*\\'" ""
;; crm-separator)
;; (car args))
;; (cdr args)))
;; (advice-add #'completing-read-multiple :filter-args #'my/crm-indicator)
;; (setq vertico-cycle t
;; enable-recursive-minibuffers t
;; read-extended-command-predicate #'command-completion-default-include-p
;; minibuffer-prompt-properties '(read-only t
;; cursor-intangible t
;; face minibuffer-prompt))
;; (vertico-mode 1))
(use-package icomplete
:ensure nil
:bind (:map icomplete-minibuffer-map
("C-S-s" . kill-line)
("C-j" . icomplete-forward-completions)
("C-k" . icomplete-backward-completions)
("DEL" . icomplete-fido-backward-updir)
("M-DEL". delete-backward-char))
:init
(defun my/crm-indicator (args)
(cons (format "[CRM%s] %s"
(replace-regexp-in-string
"\\`\\[.*?]\\*\\|\\[.*?]\\*\\'" ""
crm-separator)
(car args))
(cdr args)))
(advice-add #'completing-read-multiple :filter-args #'my/crm-indicator)
(setq vertico-cycle t
enable-recursive-minibuffers t
read-extended-command-predicate #'command-completion-default-include-p
minibuffer-prompt-properties '(read-only t
cursor-intangible t
face minibuffer-prompt))
(vertico-mode 1))
(setq completion-ignore-case t
read-file-name-completion-ignore-case t
read-buffer-completion-ignore-case t
icomplete-scroll t)
:config
(fido-mode 1)
(fido-vertical-mode 1))
;; orderless
(use-package orderless