[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
feature/icomplete-vertical 2ca463f 13/20: Improve formated size calculat
From: |
Jimmy Aguilar Mena |
Subject: |
feature/icomplete-vertical 2ca463f 13/20: Improve formated size calculation |
Date: |
Fri, 18 Sep 2020 13:00:03 -0400 (EDT) |
branch: feature/icomplete-vertical
commit 2ca463f4853c0235e70946bd60db99354fb59810
Author: Jimmy Aguilar Mena <spacibba@aol.com>
Commit: Jimmy Aguilar Mena <spacibba@aol.com>
Improve formated size calculation
* lisp/icomplete.el (icomplete--vertical-prospects) :
(icomplete--horizontal-prospects) : Use pop and
icomplete--format-function
(icomplete-completions) : Not call icomplete--horizontal-prospects
because the input is already formatted.
---
lisp/icomplete.el | 26 ++++++++++----------------
1 file changed, 10 insertions(+), 16 deletions(-)
diff --git a/lisp/icomplete.el b/lisp/icomplete.el
index ac5efc9..76814b8 100644
--- a/lisp/icomplete.el
+++ b/lisp/icomplete.el
@@ -546,18 +546,14 @@ Conditions are:
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-pixel (+ prospects-rows-pixel line-height)))
+ (when (and comps prefix-len icomplete-hide-common-prefix)
+ (push (icomplete--format-function (substring (pop comps) prefix-len))
prospects)
+ (setq prospects-rows-pixel (+ prospects-rows-pixel line-height)))
;; The others
(while (and comps (not limit))
- (setq comp (car comps)
- comps (cdr comps))
- (setq prospects-rows-pixel (+ prospects-rows-pixel line-height))
+ (setq comp (icomplete--format-function (substring (pop comps)
prefix-len))
+ prospects-rows-pixel (+ prospects-rows-pixel line-height))
(if (< prospects-rows-pixel prospects-max-height)
(push comp prospects)
@@ -614,6 +610,7 @@ Conditions are:
"List of horizontal completions limited."
(let* (;; Max total length to use, including the minibuffer content.
+ (separator-width (string-width icomplete--separator))
(prefix-len (and (stringp prefix)
;; Only hide the prefix if the corresponding info
;; is already displayed via `most'.
@@ -631,11 +628,9 @@ Conditions are:
limit prospects comp)
(while (and comps (not limit))
- (setq comp (substring (car comps) prefix-len)
- comps (cdr comps)
- prospects-len (+ (string-width comp)
- (string-width icomplete--separator)
- prospects-len))
+ (setq comp (icomplete--format-function (substring (pop comps)
prefix-len))
+ prospects-len (+ prospects-len (string-width comp)
separator-width))
+
(if (< prospects-len prospects-max-len)
(push comp prospects)
(push icomplete-ellipsis prospects)
@@ -972,8 +967,7 @@ minibuffer completion."
(when last (setcdr last base-size))
(if (or first prospects)
(format (concat determ first icomplete--separator
icomplete--list-indicators)
- (mapconcat
- #'icomplete--format-function prospects
icomplete--separator))
+ (mapconcat #'identity prospects icomplete--separator))
(concat determ " [Matched]"))))))
;;; Iswitchb compatibility
- branch feature/icomplete-vertical created (now 3ae232d), Jimmy Aguilar Mena, 2020/09/18
- feature/icomplete-vertical 6df116e 02/20: WIP_minor, Jimmy Aguilar Mena, 2020/09/18
- feature/icomplete-vertical 6194070 04/20: Icomplete-vertical fix first candidate and icomplete-hide-common-prefix., Jimmy Aguilar Mena, 2020/09/18
- feature/icomplete-vertical 8bf2245 17/20: Fix error in formatting when completion was function %, Jimmy Aguilar Mena, 2020/09/18
- feature/icomplete-vertical 91dabb1 01/20: Add variables for icomplete indicators., Jimmy Aguilar Mena, 2020/09/18
- feature/icomplete-vertical 385c9d3 03/20: Improve icomplete-vertical implementation., Jimmy Aguilar Mena, 2020/09/18
- feature/icomplete-vertical ca1d6ee 07/20: icomplete add item format., Jimmy Aguilar Mena, 2020/09/18
- feature/icomplete-vertical 1743b757 19/20: icomplete--format-function process substring with prefix., Jimmy Aguilar Mena, 2020/09/18
- feature/icomplete-vertical 2e757af 11/20: Improve vertical height calculation when not in minibuffer, Jimmy Aguilar Mena, 2020/09/18
- feature/icomplete-vertical 2ca463f 13/20: Improve formated size calculation,
Jimmy Aguilar Mena <=
- feature/icomplete-vertical 785d32a 18/20: Icomplete vertical respect icomplete-hide-common-prefix., Jimmy Aguilar Mena, 2020/09/18
- feature/icomplete-vertical 0c2cff3 14/20: convert icomplete-tidy-shadowed-file-names in a custom, Jimmy Aguilar Mena, 2020/09/18
- feature/icomplete-vertical 8a3ee9a 10/20: Fix icomplete prompt not visible in icomplete-vertical (bug#24293), Jimmy Aguilar Mena, 2020/09/18
- feature/icomplete-vertical 98d65aa 06/20: Add modified local map for icomplete., Jimmy Aguilar Mena, 2020/09/18
- feature/icomplete-vertical 9f6dfd8 12/20: Fix previous commit., Jimmy Aguilar Mena, 2020/09/18
- feature/icomplete-vertical 2f1dcaa 15/20: Make some variable local or custom., Jimmy Aguilar Mena, 2020/09/18
- feature/icomplete-vertical fd92ea8 09/20: Add special management of first candidate, Jimmy Aguilar Mena, 2020/09/18
- feature/icomplete-vertical d1b38d8 08/20: Add icomplete--format-function to format items., Jimmy Aguilar Mena, 2020/09/18
- feature/icomplete-vertical 12b45f4 05/20: icomplete-vertical code simplify, Jimmy Aguilar Mena, 2020/09/18
- feature/icomplete-vertical 01c8197 16/20: Rename internal variables to follow convention., Jimmy Aguilar Mena, 2020/09/18