File tree Expand file tree Collapse file tree 1 file changed +9
-1
lines changed Expand file tree Collapse file tree 1 file changed +9
-1
lines changed Original file line number Diff line number Diff line change @@ -4492,6 +4492,8 @@ For details of keybindings, see `ido-find-file'."
4492
4492
(ido-tidy ))
4493
4493
(throw 'ido contents))))
4494
4494
4495
+ (defvar ido--overlay nil )
4496
+
4495
4497
(defun ido-exhibit ()
4496
4498
" Post command hook for Ido."
4497
4499
; ; Find matching files and display a list in the minibuffer.
@@ -4726,7 +4728,13 @@ For details of keybindings, see `ido-find-file'."
4726
4728
(let ((inf (ido-completions contents)))
4727
4729
(setq ido-show-confirm-message nil )
4728
4730
(ido-trace " inf" inf)
4729
- (insert inf))
4731
+ (when ido--overlay
4732
+ (delete-overlay ido--overlay))
4733
+ (let ((o (make-overlay (point-max ) (point-max ) nil t t )))
4734
+ (when (> (length inf) 0 )
4735
+ (put-text-property 0 1 'cursor t inf))
4736
+ (overlay-put o 'after-string inf)
4737
+ (setq ido--overlay o)))
4730
4738
))))
4731
4739
4732
4740
(defun ido-completions (name )
You can’t perform that action at this time.
0 commit comments