changeset 46257:66e7966b0b91

(ido-make-merged-file-list): Move fully matching item to head of list.
author Kim F. Storm <storm@cua.dk>
date Mon, 08 Jul 2002 22:20:31 +0000
parents 88bc5ce0674c
children 903813a34910
files lisp/ido.el
diffstat 1 files changed, 6 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ido.el	Mon Jul 08 22:03:02 2002 +0000
+++ b/lisp/ido.el	Mon Jul 08 22:20:31 2002 +0000
@@ -2511,6 +2511,12 @@
 		      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))