diff options
| author | Dmitry Gutov <dgutov@yandex.ru> | 2020-02-05 02:50:12 +0300 |
|---|---|---|
| committer | Dmitry Gutov <dgutov@yandex.ru> | 2020-02-05 02:50:26 +0300 |
| commit | 4a0a1145054db9ba71c48ae5c3d766a06e144887 (patch) | |
| tree | fe36112cea6748892953236196b4cc27060f42de /lisp/ido.el | |
| parent | ef5fba9f40c8d3bdb314af2e00a51398d112d357 (diff) | |
| download | emacs-4a0a1145054db9ba71c48ae5c3d766a06e144887.tar.gz emacs-4a0a1145054db9ba71c48ae5c3d766a06e144887.tar.bz2 emacs-4a0a1145054db9ba71c48ae5c3d766a06e144887.zip | |
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.el | 3 |
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))) |