From b930f3072d9de1888467d8bdc2a037b191a09628 Mon Sep 17 00:00:00 2001
From: Alexander Rosenberg <zanderpkg@pm.me>
Date: Wed, 27 Dec 2023 12:19:44 -0800
Subject: [PATCH] Some stuff

---
 init.el | 68 +++++++++++++++++++++++++++++++++++++--------------------
 1 file changed, 44 insertions(+), 24 deletions(-)

diff --git a/init.el b/init.el
index 74a60db..046a37b 100644
--- a/init.el
+++ b/init.el
@@ -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