From: Kim F. Storm <storm@cua.dk>
Date: Wed, 27 Dec 2006 00:26:54 +0000 (+0000)
Subject: (ido-set-matches-1): Never put current buffer first if
X-Git-Tag: emacs-pretest-22.0.93~396
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=39449da0b446431f7d0e201318d51f11a576c47e;p=emacs.git

(ido-set-matches-1): Never put current buffer first if
there are other matches.
---

diff --git a/lisp/ido.el b/lisp/ido.el
index 2d4ac214dd1..b398e68319d 100644
--- a/lisp/ido.el
+++ b/lisp/ido.el
@@ -3579,6 +3579,9 @@ for first matching file."
 			    (/= (aref name 0) ?.)))
 		      (string-match re name))
 		 (cond
+		  ((and (eq ido-cur-item 'buffer)
+			(string= name (buffer-name ido-entry-buffer)))
+		   (setq matches (cons item matches)))
 		  ((and full-re (string-match full-re name))
 		   (setq full-matches (cons item full-matches)))
 		  ((and suffix-re (string-match suffix-re name))