changeset 67624:e17240315b4a

(crm-minibuffer-completion-help): Use `crm-current-element' for second arg of `display-completion-list'.
author Juri Linkov <juri@jurta.org>
date Fri, 16 Dec 2005 19:09:43 +0000
parents 465f402362cd
children 915691b6504f
files lisp/emacs-lisp/crm.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/crm.el	Fri Dec 16 19:09:20 2005 +0000
+++ b/lisp/emacs-lisp/crm.el	Fri Dec 16 19:09:43 2005 +0000
@@ -247,7 +247,9 @@
       (if (null completions)
 	  (crm-temp-echo-area-glyphs " [No completions]")
 	(with-output-to-temp-buffer "*Completions*"
-	  (display-completion-list (sort completions 'string-lessp))))))
+	  (display-completion-list
+	   (sort completions 'string-lessp)
+	   crm-current-element)))))
   nil)
 
 (defun crm-do-completion ()