diff options
Diffstat (limited to 'lisp/emacs-lisp/crm.el')
-rw-r--r-- | lisp/emacs-lisp/crm.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/crm.el b/lisp/emacs-lisp/crm.el index 46ae6186e44..12f0788a0de 100644 --- a/lisp/emacs-lisp/crm.el +++ b/lisp/emacs-lisp/crm.el @@ -247,7 +247,9 @@ and return t." (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 () |