(ido-make-merged-file-list): Move fully matching item to head of list.
This commit is contained in:
parent
9066a4d070
commit
9a08196a0b
2 changed files with 12 additions and 0 deletions
|
@ -1,3 +1,9 @@
|
|||
2002-07-09 Kim F. Storm <storm@cua.dk>
|
||||
|
||||
* ido.el (ido-make-merged-file-list): Move fully matching item to
|
||||
head of list.
|
||||
(ido-find-common-substring): Return substring instead of t.
|
||||
|
||||
2002-07-08 Juanma Barranquero <lektu@terra.es>
|
||||
|
||||
* info.el (Info-directory-list): Fix docstring.
|
||||
|
|
|
@ -2511,6 +2511,12 @@ for first matching file."
|
|||
res t))))))
|
||||
(if (and res (not (eq res t)))
|
||||
(setq res (ido-sort-merged-list res auto)))
|
||||
(when (and (or ido-rotate-temp ido-rotate-file-list-default)
|
||||
(> (length text) 0))
|
||||
(let ((elt (assoc text res)))
|
||||
(unless (eq elt (car res))
|
||||
(setq res (delq elt res))
|
||||
(setq res (cons elt res)))))
|
||||
(message nil)
|
||||
res))
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue