Replace use of completing-read with selection-menu when completing for recipient addresses. --- emacs/notmuch-address.el | 6 +++--- 1 files changed, 3 insertions(+), 3 deletions(-) diff --git a/emacs/notmuch-address.el b/emacs/notmuch-address.el index 2bf762b..1d63fe4 100644 --- a/emacs/notmuch-address.el +++ b/emacs/notmuch-address.el @@ -45,6 +45,8 @@ line." (defun notmuch-address-options (original) (process-lines notmuch-address-command original)) +(require 'selection-menu) + (defun notmuch-address-expand-name () (let* ((end (point)) (beg (save-excursion @@ -61,9 +63,7 @@ line." ((eq num-options 1) (car options)) (t - (completing-read (format "Address (%s matches): " num-options) - (cdr options) nil nil (car options) - 'notmuch-address-history))))) + (selection-menu "Send To:" options t))))) (if chosen (progn (push chosen notmuch-address-history) -- 1.7.8.2