From: Lars Magne Ingebrigtsen <larsi@gnus.org>
Date: Fri, 14 Apr 2006 10:42:46 +0000 (+0000)
Subject: * ecomplete.el (ecomplete-display-matches): Get highlightling
X-Git-Url: https://cgit.sxemacs.org/?a=commitdiff_plain;h=c98423449fb3995d392f94e9f873f5941aff4650;p=gnus

* ecomplete.el (ecomplete-display-matches): Get highlightling
right.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 968dbc13e..25b1c9607 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2006-04-14  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+	* ecomplete.el (ecomplete-display-matches): Get highlightling
+	right. 
+
 	* message.el (message-display-abbrev): Small optimization.
 
 	* ecomplete.el (ecomplete-display-matches): Allow automatic
diff --git a/lisp/ecomplete.el b/lisp/ecomplete.el
index e9eef9d5a..665fde320 100644
--- a/lisp/ecomplete.el
+++ b/lisp/ecomplete.el
@@ -106,11 +106,11 @@
 	(progn
 	  (message "No ecomplete matches")
 	  nil)
-      (setq highlight (ecomplete-highlight-match-line matches line))
       (if (not choose)
 	  (progn
-	    (message highlight)
+	    (message matches)
 	    nil)
+	(setq highlight (ecomplete-highlight-match-line matches line))
 	(while (not (memq (setq command (read-event highlight)) '(? return)))
 	  (cond
 	   ((eq command (aref (kbd "M-n") 0))