summaryrefslogtreecommitdiff
path: root/lisp/ido.el
diff options
context:
space:
mode:
authorDmitry Gutov <dgutov@yandex.ru>2020-02-05 02:50:12 +0300
committerDmitry Gutov <dgutov@yandex.ru>2020-02-05 02:50:26 +0300
commit4a0a1145054db9ba71c48ae5c3d766a06e144887 (patch)
treefe36112cea6748892953236196b4cc27060f42de /lisp/ido.el
parentef5fba9f40c8d3bdb314af2e00a51398d112d357 (diff)
downloademacs-4a0a1145054db9ba71c48ae5c3d766a06e144887.tar.gz
Support ido-vertical-mode better
* lisp/ido.el (ido-exhibit): Prepend a space to INF if it starts with a newline (bug#39379).
Diffstat (limited to 'lisp/ido.el')
-rw-r--r--lisp/ido.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/ido.el b/lisp/ido.el
index 355be5eaa66..6707d814077 100644
--- a/lisp/ido.el
+++ b/lisp/ido.el
@@ -4732,6 +4732,9 @@ For details of keybindings, see `ido-find-file'."
(delete-overlay ido--overlay))
(let ((o (make-overlay (point-max) (point-max) nil t t)))
(when (> (length inf) 0)
+ ;; For hacks that redefine ido-completions function (bug#39379)
+ (when (eq (aref inf 0) ?\n)
+ (setq inf (concat " " inf)))
(put-text-property 0 1 'cursor t inf))
(overlay-put o 'after-string inf)
(setq ido--overlay o)))