From ea028fa8339bbdec9256b9572d8f7346da865edf Mon Sep 17 00:00:00 2001
From: Marc Coquand <marc@coquand.email>
Date: Fri, 29 Nov 2024 14:17:08 +0200
Subject: .

---
 home/dots/.emacs | 28 ++++++++++++++--------------
 1 file changed, 14 insertions(+), 14 deletions(-)

diff --git a/home/dots/.emacs b/home/dots/.emacs
index 1afe2be..85edb41 100644
--- a/home/dots/.emacs
+++ b/home/dots/.emacs
@@ -393,6 +393,8 @@
   :custom
   (imenu-auto-rescan t))
 
+
+
 (defun sudo-shell-command (command)
   (interactive "MShell command (root): ")
   (with-temp-buffer
@@ -792,22 +794,20 @@
    "Introspect"
    #'ctrl-lock-off))
 
-(use-package icomplete
-  :bind
-  (:map minibuffer-mode-map
-   ("C-<return>" . icomplete-fido-exit)
-   :repeat-map fido-next-buffer-repeat-map
-   ("s" . icomplete-forward-completions)
-   ("r" . icomplete-backward-completions))
+(use-package ido
   :init
-  (fido-mode t)
+  (ido-mode t)
+  :bind
+  (:repeat-map ido-completion-mode-map
+   ("s" . ido-next-match)
+   ("r" . ido-prev-match))
   :custom
-  (icomplete-prospects-height 1)
-  (icomplete-compute-delay 0)
-  (icomplete-delay-completions-threshold 0.15)
-  (icomplete-separator ", ")
-  (icomplete-show-matches-on-no-input 't)
-  (icomplete-max-delay-chars 4))
+  (ido-enable-flex-matching nil)
+  (ido-enable-regexp nil)
+  (ido-max-prospects 12)
+  (ido-max-window-height 1)
+  (ido-decorations
+   '("" "" "  " " , ..." "[" "]" " [No match]" " [Matched]" " [Not readable]" " [Too big]" " [Confirm]")))
 
 (use-package calendar
   :defer t
-- 
cgit v1.2.3