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
