[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
feature/icomplete-vertical 4047304 4/9: Icomplete-vertical fix first can
From: |
Jimmy Aguilar Mena |
Subject: |
feature/icomplete-vertical 4047304 4/9: Icomplete-vertical fix first candidate and icomplete-hide-common-prefix. |
Date: |
Sun, 13 Sep 2020 09:47:54 -0400 (EDT) |
branch: feature/icomplete-vertical
commit 4047304e964969b9b4fd4d39590ba2b61d0faae4
Author: Jimmy Aguilar Mena <spacibba@aol.com>
Commit: Jimmy Aguilar Mena <spacibba@aol.com>
Icomplete-vertical fix first candidate and icomplete-hide-common-prefix.
* lisp/icomplete.el (icomplete--vertical-prospects) : process
differently the fist candidate and not remove prefixes for the rest.
---
lisp/icomplete.el | 18 +++++++++++++-----
1 file changed, 13 insertions(+), 5 deletions(-)
diff --git a/lisp/icomplete.el b/lisp/icomplete.el
index bccceec..b793777 100644
--- a/lisp/icomplete.el
+++ b/lisp/icomplete.el
@@ -512,11 +512,18 @@ Conditions are:
max-mini-window-height)
(t 1)))
limit prospects comp)
+
+ ;; First candidate
+ (when (and prefix-len
+ icomplete-hide-common-prefix)
+ (push (substring (car comps) prefix-len) prospects)
+
+ (setq comps (cdr comps)
+ prospects-rows (1+ prospects-rows)))
+
+ ;; The others
(while (and comps (not limit))
- (setq comp (if (and icomplete-hide-common-prefix
- prefix-len)
- (substring (car comps) prefix-len)
- (car comps))
+ (setq comp (car comps)
comps (cdr comps))
(setq prospects-rows (1+ prospects-rows))
@@ -525,7 +532,8 @@ Conditions are:
(push comp prospects)
(push icomplete-ellipsis prospects)
(setq limit t)))
- (nreverse prospects)))
+ (nreverse prospects)
+ ))
(defun icomplete--vertical-mode-setup ()
- branch feature/icomplete-vertical created (now 9718db9), Jimmy Aguilar Mena, 2020/09/13
- feature/icomplete-vertical 6c74674 1/9: Add variables for icomplete indicators., Jimmy Aguilar Mena, 2020/09/13
- feature/icomplete-vertical 4047304 4/9: Icomplete-vertical fix first candidate and icomplete-hide-common-prefix.,
Jimmy Aguilar Mena <=
- feature/icomplete-vertical 3007a5e 2/9: WIP_minor, Jimmy Aguilar Mena, 2020/09/13
- feature/icomplete-vertical bfe0127 3/9: Improve icomplete-vertical implementation., Jimmy Aguilar Mena, 2020/09/13
- feature/icomplete-vertical 3f68496 5/9: icomplete-vertical code simplify, Jimmy Aguilar Mena, 2020/09/13
- feature/icomplete-vertical 40b57c4 7/9: icomplete add item format., Jimmy Aguilar Mena, 2020/09/13
- feature/icomplete-vertical fbc84d8 8/9: Add icomplete--format-function to format items., Jimmy Aguilar Mena, 2020/09/13
- feature/icomplete-vertical 9718db9 9/9: Add special management of first candidate, Jimmy Aguilar Mena, 2020/09/13
- feature/icomplete-vertical 372feef 6/9: Add modified local map for icomplete., Jimmy Aguilar Mena, 2020/09/13