Commit 9a155058 authored by Juanma Barranquero's avatar Juanma Barranquero
Browse files

lisp/icomplete.el: Use "..." when U+2026 cannot be displayed.

parent 8268febf
2014-03-01 Juanma Barranquero <lekktu@gmail.com>
* icomplete.el (icomplete-completions):
Revert back to using "..." when ?… cannot be displayed.
2014-02-28 Juanma Barranquero <lekktu@gmail.com>
* finder.el (finder-unload-function): New function.
......
......@@ -392,6 +392,7 @@ matches exist."
;; a prefix of most, or something else.
(compare (compare-strings name nil nil
most nil nil completion-ignore-case))
(ellipsis (if (char-displayable-p ?) "…" "..."))
(determ (unless (or (eq t compare) (eq t most-try)
(= (setq compare (1- (abs compare)))
(length most)))
......@@ -402,14 +403,14 @@ matches exist."
(substring most compare))
;; Don't bother truncating if it doesn't gain
;; us at least 2 columns.
((< compare 3) most)
(t (concat "…" (substring most compare))))
((< compare (+ 2 (length ellipsis))) most)
(t (concat ellipsis (substring most compare))))
close-bracket)))
;;"-prospects" - more than one candidate
(prospects-len (+ (string-width
(or determ (concat open-bracket close-bracket)))
(string-width icomplete-separator)
3 ;; take {…} into account
(+ 2 (length ellipsis)) ;; take {…} into account
(string-width (buffer-string))))
(prospects-max
;; Max total length to use, including the minibuffer content.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment